Index: generic/nsf.c =================================================================== diff -u -r827f6d934f60d5ea0c02ea68d9e4cb8fc8a2f7ad -rdae38b36e64b33944d6d9fe9f1bd440ac6ec4baa --- generic/nsf.c (.../nsf.c) (revision 827f6d934f60d5ea0c02ea68d9e4cb8fc8a2f7ad) +++ generic/nsf.c (.../nsf.c) (revision dae38b36e64b33944d6d9fe9f1bd440ac6ec4baa) @@ -25163,7 +25163,7 @@ #if defined(TCL_MEM_DEBUG) TclDumpMemoryInfo((ClientData) stderr, 0); Tcl_DumpActiveMemory("./nsfActiveMem"); - /* Tcl_GlobalEval(interp, "puts {checkmem to checkmemFile}; + /* Tcl_Eval(interp, "puts {checkmem to checkmemFile}; checkmem checkmemFile"); */ #endif @@ -25464,14 +25464,14 @@ /* * The file "predefined.h" contains some methods and library procs * implemented in Tcl - they could go in a nsf.tcl file, but - * they're embedded here with Tcl_GlobalEval to avoid the need to + * they're embedded here with Tcl_Eval to avoid the need to * carry around a separate file at runtime. */ #include "predefined.h" /* fprintf(stderr, "predefined=<<%s>>\n", cmd);*/ - if (Tcl_GlobalEval(interp, cmd) != TCL_OK) { + if (Tcl_Eval(interp, cmd) != TCL_OK) { static char cmd[] = "puts stderr \"Error in predefined code\n\ $::errorInfo\"";