Index: generic/nsfStack.c
===================================================================
diff -u -ref1f9efa0bc697404c0aa5322bbd5cc2d7796c2c -r1945e08ac5a2e0f6387145d948bfb29eee0016fa
--- generic/nsfStack.c	(.../nsfStack.c)	(revision ef1f9efa0bc697404c0aa5322bbd5cc2d7796c2c)
+++ generic/nsfStack.c	(.../nsfStack.c)	(revision 1945e08ac5a2e0f6387145d948bfb29eee0016fa)
@@ -139,7 +139,7 @@
   } else {
     /* The object has no nsPtr, so we diguise as a proc, using fakeProc */
     Tcl_PushCallFrame(interp, (Tcl_CallFrame *)framePtr, Tcl_CallFrame_nsPtr(Tcl_Interp_varFramePtr(interp)),
-                      1|FRAME_IS_NSF_OBJECT);
+                      FRAME_IS_PROC|FRAME_IS_NSF_OBJECT);
 
     Tcl_CallFrame_procPtr(framePtr) = &RUNTIME_STATE(interp)->fakeProc;
     if (object->varTablePtr == NULL) {
@@ -182,7 +182,7 @@
     framePtr, cscPtr, Tcl_GetCommandName(interp,cscPtr->cmdPtr));*/
 
   Tcl_PushCallFrame(interp, (Tcl_CallFrame *)framePtr, Tcl_CallFrame_nsPtr(varFramePtr),
-		    1|FRAME_IS_NSF_CMETHOD);
+		    FRAME_IS_PROC|FRAME_IS_NSF_CMETHOD);
   Tcl_CallFrame_clientData(framePtr) = (ClientData)cscPtr;
   Tcl_CallFrame_procPtr(framePtr) = &RUNTIME_STATE(interp)->fakeProc;
 }