XS: #807

Moddable-OpenSource · Jan 26, 2022 · e140f29 · e140f29
1 parent cf213e8
commit e140f29
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/xs/sources/xsType.c b/xs/sources/xsType.c
@@ -327,7 +327,7 @@ void fxOrdinaryCall(txMachine* the, txSlot* instance, txSlot* _this, txSlot* arg
 
 void fxOrdinaryConstruct(txMachine* the, txSlot* instance, txSlot* arguments, txSlot* target)
 {
-	txInteger c, i;
+    txIndex c, i;
 	/* THIS */
 	mxPushUninitialized();
 	/* FUNCTION */
@@ -343,7 +343,7 @@ void fxOrdinaryConstruct(txMachine* the, txSlot* instance, txSlot* arguments, tx
 	/* ARGUMENTS */
 	mxPushSlot(arguments);
 	mxGetID(mxID(_length));
-	c = fxToInteger(the, the->stack);
+    c = (txIndex)fxToLength(the, the->stack);
 	mxPop();
 	for (i = 0; i < c; i++) {
 		mxPushSlot(arguments);