Lines Matching defs:iPtr
1834 Interp *iPtr; /* The target interpreter. */
1871 iPtr = (Interp *) aliasPtr->targetInterp;
1872 iPtr->numLevels++;
1873 Tcl_Preserve((ClientData) iPtr);
1874 Tcl_ResetResult((Tcl_Interp *) iPtr);
1875 result = (cmdInfo.proc)(cmdInfo.clientData, (Tcl_Interp *) iPtr,
1877 iPtr->numLevels--;
1878 if (iPtr->numLevels == 0) {
1880 result = TclUpdateReturnInfo(iPtr);
1883 Tcl_ResetResult((Tcl_Interp *) iPtr);
1885 iPtr->result = "invoked \"break\" outside of a loop";
1887 iPtr->result = "invoked \"continue\" outside of a loop";
1889 iPtr->result = iPtr->resultSpace;
1890 sprintf(iPtr->resultSpace, "command returned bad code: %d",
1915 if (interp != (Tcl_Interp *) iPtr) {
1932 if (!(iPtr->flags & ERR_ALREADY_LOGGED)) {
1933 Tcl_AddErrorInfo((Tcl_Interp *) iPtr, "");
1935 iPtr->flags &= ~ERR_ALREADY_LOGGED;
1937 Tcl_AddErrorInfo(interp, Tcl_GetVar2((Tcl_Interp *) iPtr,
1940 Tcl_GetVar2((Tcl_Interp *) iPtr, "errorCode",
1943 if (iPtr->freeProc != NULL) {
1944 interp->result = iPtr->result;
1945 interp->freeProc = iPtr->freeProc;
1946 iPtr->freeProc = 0;
1948 Tcl_SetResult(interp, iPtr->result, TCL_VOLATILE);
1950 Tcl_ResetResult((Tcl_Interp *) iPtr);
1952 Tcl_Release((ClientData) iPtr);