Index: generic/nsf.c =================================================================== diff -u -r8040970d348ab537d9e3fefbc7f15d262ca52870 -r9e5a93337017bb62c890db4210939cf23cf31179 --- generic/nsf.c (.../nsf.c) (revision 8040970d348ab537d9e3fefbc7f15d262ca52870) +++ generic/nsf.c (.../nsf.c) (revision 9e5a93337017bb62c890db4210939cf23cf31179) @@ -9422,6 +9422,13 @@ return result; } +#if !defined(NSF_ASSEMBLE) +static int NsfAsmProc(ClientData clientData, Tcl_Interp *interp, + int objc, Tcl_Obj *CONST objv[]) { + return TCL_OK; +} +#endif + /* *---------------------------------------------------------------------- * MethodDispatchCsc -- @@ -17858,7 +17865,16 @@ return 0; } -#include "nsfAssemble.c" +#if defined(NSF_ASSEMBLE) +# include "asm/nsfAssemble.c" +#else +static int +NsfAsmMethodCreateCmd(Tcl_Interp *interp, NsfObject *defObject, + int withInner_namespace, int withPer_object, NsfObject *regObject, + Tcl_Obj *nameObj, Tcl_Obj *argumentsObj, Tcl_Obj *bodyObj) { + return TCL_OK; +} +#endif /*********************************************************************** * Begin generated Next Scripting commands @@ -18060,8 +18076,14 @@ {-argName "body" -required 1 -type tclobj} } */ +#if !defined(NSF_ASSEMBLE) static int NsfAsmProcCmd(Tcl_Interp *interp, int with_ad, Tcl_Obj *nameObj, Tcl_Obj *arguments, Tcl_Obj *body) { + return TCL_OK; +} +#else +static int +NsfAsmProcCmd(Tcl_Interp *interp, int with_ad, Tcl_Obj *nameObj, Tcl_Obj *arguments, Tcl_Obj *body) { NsfParsedParam parsedParam; int result; /* @@ -18090,6 +18112,7 @@ return result; } +#endif /* cmd configure NsfConfigureCmd { @@ -23938,7 +23961,7 @@ */ #include "predefined.h" - +>>> /* fprintf(stderr, "predefined=<<%s>>\n", cmd);*/ if (Tcl_GlobalEval(interp, cmd) != TCL_OK) { static char cmd[] =