Index: generic/nsf.c =================================================================== diff -u -r261204ec313bdc468ba1fd690facd05607c99879 -re82e7006322a3b8b65f4c050e0b4846faa3e2e6d --- generic/nsf.c (.../nsf.c) (revision 261204ec313bdc468ba1fd690facd05607c99879) +++ generic/nsf.c (.../nsf.c) (revision e82e7006322a3b8b65f4c050e0b4846faa3e2e6d) @@ -9528,7 +9528,7 @@ *---------------------------------------------------------------------- * ObjectCmdMethodDispatch -- * - * Invoke a method implemented as ab object. The referenced object is used + * Invoke a method implemented as an object. The referenced object is used * as a source for methods to be executed. Essentially this is currently * primarily used to implement the dispatch of ensemble objects. * @@ -9584,6 +9584,9 @@ invokedObject, ObjectName(invokedObject), methodName);*/ if (invokedObject->flags & NSF_KEEP_CALLER_SELF) { + /*fprintf(stderr, "... keepcallerself invoked obj is %p %s instead of %p %s\n", + callerSelf, ObjectName(callerSelf), + invokedObject, ObjectName(invokedObject));*/ invokedObject = callerSelf; } return NsfObjDispatch(invokedObject, interp, objc, objv);