Function fxGetPrototypeFromConstructor

xs/sources/xsFunction.c:182–202

}

txSlot* fxGetPrototypeFromConstructor(txMachine* the, txSlot* defaultPrototype)
{
	txSlot* result = the->stack;
	fxCheckCallable(the, result);
	mxDub();
	mxGetID(mxID(_prototype));
	if (!mxIsReference(the->stack)) {
		txSlot* instance = result->value.reference;
		txSlot* proxy = instance->next;
		if (proxy->kind == XS_PROXY_KIND) {
			if (!proxy->value.proxy.handler)
				mxTypeError("(proxy).%s: no handler", fxName(the, mxID(_prototype)));
			if (!proxy->value.proxy.target)
				mxTypeError("(proxy).%s: no target", fxName(the, mxID(_prototype)));
		}
		the->stack->kind = defaultPrototype->kind;
		the->stack->value = defaultPrototype->value;
	}
	mxPullSlot(result);
	return result->value.reference;
}

#ifndef mxLink
txSlot* fxNewFunctionLength(txMachine* the, txSlot* instance, txNumber length)