Index: generic/nsfAPI.h =================================================================== diff -u -r1919d17fefad9446170fa6d532b439f494189b32 -rb604626384c5692394df7e276ac9c10e6229dbfd --- generic/nsfAPI.h (.../nsfAPI.h) (revision 1919d17fefad9446170fa6d532b439f494189b32) +++ generic/nsfAPI.h (.../nsfAPI.h) (revision b604626384c5692394df7e276ac9c10e6229dbfd) @@ -281,7 +281,7 @@ /* just to define the symbol */ -static Nsf_methodDefinition method_definitions[120]; +static Nsf_methodDefinition method_definitions[121]; static const char *method_command_namespace_names[] = { "::nsf::methods::object::info", @@ -477,6 +477,8 @@ NSF_nonnull(1) NSF_nonnull(2) NSF_nonnull(4); static int NsfOUpvarMethodStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const* objv) NSF_nonnull(1) NSF_nonnull(2) NSF_nonnull(4); +static int NsfOVolatile1MethodStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const* objv) + NSF_nonnull(1) NSF_nonnull(2) NSF_nonnull(4); static int NsfOVolatileMethodStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const* objv) NSF_nonnull(1) NSF_nonnull(2) NSF_nonnull(4); static int NsfObjInfoBaseclassMethodStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const* objv) @@ -716,6 +718,8 @@ NSF_nonnull(1) NSF_nonnull(2); static int NsfOUpvarMethod(Tcl_Interp *interp, NsfObject *object, int objc, Tcl_Obj *const* objv) NSF_nonnull(1) NSF_nonnull(2); +static int NsfOVolatile1Method(Tcl_Interp *interp, NsfObject *object) + NSF_nonnull(1) NSF_nonnull(2); static int NsfOVolatileMethod(Tcl_Interp *interp, NsfObject *object) NSF_nonnull(1) NSF_nonnull(2); static int NsfObjInfoBaseclassMethod(Tcl_Interp *interp, NsfObject *object) @@ -862,6 +866,7 @@ NsfOResidualargsMethodIdx, NsfOUplevelMethodIdx, NsfOUpvarMethodIdx, + NsfOVolatile1MethodIdx, NsfOVolatileMethodIdx, NsfObjInfoBaseclassMethodIdx, NsfObjInfoChildrenMethodIdx, @@ -3086,6 +3091,26 @@ } static int +NsfOVolatile1MethodStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const* objv) { + NsfObject *object; + + NSF_nonnull_assert(clientData != NULL); + assert(objc > 0); + + object = (NsfObject *)clientData; + + + if (unlikely(objc != 1)) { + return NsfArgumentError(interp, "too many arguments:", + method_definitions[NsfOVolatile1MethodIdx].paramDefs, + NULL, objv[0]); + } + + return NsfOVolatile1Method(interp, object); + +} + +static int NsfOVolatileMethodStub(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const* objv) { NsfObject *object; @@ -3715,7 +3740,7 @@ } } -static Nsf_methodDefinition method_definitions[120] = { +static Nsf_methodDefinition method_definitions[121] = { {"::nsf::methods::class::alloc", NsfCAllocMethodStub, 1, { {"objectName", NSF_ARG_REQUIRED, 1, Nsf_ConvertTo_Tclobj, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}} }, @@ -4132,6 +4157,9 @@ {"::nsf::methods::object::upvar", NsfOUpvarMethodStub, 1, { {"args", 0, 1, ConvertToNothing, NULL,NULL,"allargs",NULL,NULL,NULL,NULL,NULL}} }, +{"::nsf::methods::object::volatile1", NsfOVolatile1MethodStub, 0, { + {NULL, 0, 0, NULL, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}} +}, {"::nsf::methods::object::volatile", NsfOVolatileMethodStub, 0, { {NULL, 0, 0, NULL, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}} },