Function fx_Object_entries

xs/sources/xsObject.c:607–641

}

void fx_Object_entries(txMachine* the)
{
	txSlot* instance;
	txSlot* result;
	txSlot* array;
	txSlot* property;
	txSlot** address;
	txSlot* item;
	if ((mxArgc < 1) || (mxArgv(0)->kind == XS_UNDEFINED_KIND) || (mxArgv(0)->kind == XS_NULL_KIND))
		mxTypeError("invalid object");
	instance = fxToInstance(the, mxArgv(0));
	mxPush(mxArrayPrototype);
	result = fxNewArrayInstance(the);
	mxPullSlot(mxResult);
	array = result->next;
	mxBehaviorOwnKeys(the, instance, XS_EACH_NAME_FLAG, array);
	mxPushUndefined();
	property = the->stack;
	address = &array->next;
	while ((item = *address)) {
		if (mxBehaviorGetOwnProperty(the, instance, item->value.at.id, item->value.at.index, property) && !(property->flag & XS_DONT_ENUM_FLAG)) {
			array->value.array.length++;
			mxPushUndefined();
			fxKeyAt(the, item->value.at.id, item->value.at.index, the->stack);
			mxPushReference(instance);
			mxGetAll(item->value.at.id, item->value.at.index);
			fxConstructArrayEntry(the, item);
			address = &(item->next);
		}
		else
			*address = item->next;
	}
	mxPop();
	fxCacheArray(the, result);
}

void fx_Object_freeze(txMachine* the)
{