{
zval **stack, /* Input stack */
**val; /* Value to be popped */
- HashTable *new_hash; /* New stack */
+ char *key = NULL;
+ int key_len, index;
/* Get the arguments and do error-checking */
if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &stack) == FAILURE) {
INIT_PZVAL(return_value);
/* Delete the first or last value */
- new_hash = php_splice(Z_ARRVAL_PP(stack), (off_the_end) ? -1 : 0, 1, NULL, 0, NULL);
- zend_hash_destroy(Z_ARRVAL_PP(stack));
- efree(Z_ARRVAL_PP(stack));
- Z_ARRVAL_PP(stack) = new_hash;
+ zend_hash_get_current_key_ex(Z_ARRVAL_PP(stack), &key, &key_len, &index, 0, NULL);
+ zend_hash_del_key_or_index(Z_ARRVAL_PP(stack), key, key_len, index, (key) ? HASH_DEL_KEY : HASH_DEL_INDEX);
+
+ // If we did a shift... re-index like it did before
+ if(!off_the_end) {
+ HANDLE_BLOCK_INTERRUPTIONS();
+ {
+ int k = 0;
+ Bucket *p = Z_ARRVAL_PP(stack)->pListHead;
+ while (p != NULL) {
+ if (p->nKeyLength == 0)
+ p->h = k++;
+ p = p->pListNext;
+ }
+ Z_ARRVAL_PP(stack)->nNextFreeElement = k+1;
+ zend_hash_rehash(Z_ARRVAL_PP(stack));
+ }
+ HANDLE_UNBLOCK_INTERRUPTIONS();
+ }
}
/* }}} */
-
/* {{{ proto mixed array_pop(array stack)
Pops an element off the end of the array */
PHP_FUNCTION(array_pop)