Index: generic/nsfAPI.h =================================================================== diff -u -N -r81788340d06828bb7131be38cc31858cf842612e -r7f58a3a3dd12990de3dfc8096a85d2341cf02075 --- generic/nsfAPI.h (.../nsfAPI.h) (revision 81788340d06828bb7131be38cc31858cf842612e) +++ generic/nsfAPI.h (.../nsfAPI.h) (revision 7f58a3a3dd12990de3dfc8096a85d2341cf02075) @@ -281,7 +281,7 @@ /* just to define the symbol */ -static Nsf_methodDefinition method_definitions[119]; +static Nsf_methodDefinition method_definitions[120]; static const char *method_command_namespace_names[] = { "::nsf::methods::object::info", @@ -363,6 +363,8 @@ NSF_nonnull(2) NSF_nonnull(4); static int NsfDebugShowObjStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST* objv) NSF_nonnull(2) NSF_nonnull(4); +static int NsfDefinitionNamespaceCmdStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST* objv) + NSF_nonnull(2) NSF_nonnull(4); static int NsfDirectDispatchCmdStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST* objv) NSF_nonnull(2) NSF_nonnull(4); static int NsfDispatchCmdStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST* objv) @@ -600,6 +602,8 @@ NSF_nonnull(1); static int NsfDebugShowObj(Tcl_Interp *interp, Tcl_Obj *obj) NSF_nonnull(1) NSF_nonnull(2); +static int NsfDefinitionNamespaceCmd(Tcl_Interp *interp) + NSF_nonnull(1); static int NsfDirectDispatchCmd(Tcl_Interp *interp, NsfObject *object, FrameIdx_t withFrame, Tcl_Obj *command, int nobjc, Tcl_Obj *CONST* nobjv) NSF_nonnull(1) NSF_nonnull(2) NSF_nonnull(4); static int NsfDispatchCmd(Tcl_Interp *interp, NsfObject *object, int withIntrinsic, int withSystem, Tcl_Obj *command, int nobjc, Tcl_Obj *CONST* nobjv) @@ -801,6 +805,7 @@ NsfDebugGetDictIdx, NsfDebugRunAssertionsCmdIdx, NsfDebugShowObjIdx, + NsfDefinitionNamespaceCmdIdx, NsfDirectDispatchCmdIdx, NsfDispatchCmdIdx, NsfFinalizeCmdIdx, @@ -1791,6 +1796,22 @@ } static int +NsfDefinitionNamespaceCmdStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST* objv) { + (void)clientData; + + + + if (unlikely(objc != 1)) { + return NsfArgumentError(interp, "too many arguments:", + method_definitions[NsfDefinitionNamespaceCmdIdx].paramDefs, + NULL, objv[0]); + } + + return NsfDefinitionNamespaceCmd(interp); + +} + +static int NsfDirectDispatchCmdStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST* objv) { ParseContext pc; (void)clientData; @@ -3588,7 +3609,7 @@ } } -static Nsf_methodDefinition method_definitions[119] = { +static Nsf_methodDefinition method_definitions[120] = { {"::nsf::methods::class::alloc", NsfCAllocMethodStub, 1, { {"objectName", NSF_ARG_REQUIRED, 1, Nsf_ConvertTo_Tclobj, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}} }, @@ -3740,6 +3761,9 @@ {"::nsf::__db_show_obj", NsfDebugShowObjStub, 1, { {"obj", NSF_ARG_REQUIRED, 1, Nsf_ConvertTo_Tclobj, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}} }, +{"::nsf::definitionnamespace", NsfDefinitionNamespaceCmdStub, 0, { + {NULL, 0, 0, NULL, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}} +}, {"::nsf::directdispatch", NsfDirectDispatchCmdStub, 4, { {"object", NSF_ARG_REQUIRED, 1, Nsf_ConvertTo_Object, NULL,NULL,"object",NULL,NULL,NULL,NULL,NULL}, {"-frame", NSF_ARG_IS_ENUMERATION, 1, ConvertToFrame, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL},