Function value_array_index_get

engine/value.c:311–336

}

engine_value *value_array_index_get(engine_value *arr, unsigned long idx) {
	HashTable *h = NULL;
	engine_value *val = value_new();

	switch (arr->kind) {
	case KIND_ARRAY:
	case KIND_MAP:
		h = Z_ARRVAL_P(arr->internal);
		break;
	case KIND_OBJECT:
		h = Z_OBJPROP_P(arr->internal);
		break;
	default:
		// Attempting to return the first index of a non-array value will return
		// the value itself, allowing for implicit conversions of scalar values
		// to arrays.
		if (idx == 0) {
			value_set_zval(val, arr->internal);
			return val;
		}

		return val;
	}

	VALUE_ARRAY_INDEX_GET(h, idx, val);
}

engine_value *value_array_key_get(engine_value *arr, char *key) {
	HashTable *h = NULL;