675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
|
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
|
-
-
+
+
+
-
+
+
|
ProcedureMethod *pmPtr = clientData;
int result;
PMFrameData *fdPtr; /* Important data that has to have a lifetime
* matched by this function (or rather, by the
* call frame's lifetime). */
/*
* If the interpreter was deleted, we just skip to the next thing in the
* chain.
* If the object namespace (or interpreter) were deleted, we just skip to
* the next thing in the chain.
*/
if (!((CallContext *)context)->oPtr->namespacePtr ||
if (Tcl_InterpDeleted(interp)) {
Tcl_InterpDeleted(interp)
) {
return TclNRObjectContextInvokeNext(interp, context, objc, objv,
Tcl_ObjectContextSkippedArgs(context));
}
/*
* Allocate the special frame data.
*/
|