summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--generic/tclBasic.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index bce9684..f4e026f 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -4143,7 +4143,7 @@ TclNREvalObjv(
TclNRAddCallback(interp, NRCommand, NULL, INT2PTR(1), objc, objv);
iPtr->evalFlags &= ~TCL_EVAL_REDIRECT;
} else {
- TclNRAddCallback(interp, NRCommand, NULL, NULL, objc, objv);
+ TclNRAddCallback(interp, NRCommand, NULL, NULL, INT2PTR(objc), objv);
}
cmdPtrPtr = (Command **) &(TOP_CB(interp)->data[0]);