Lines Matching refs:iPtr
1728 * of the contents of the file, iPtr->scriptFile is made to
1744 Interp *iPtr;
1789 iPtr = (Interp *) interp;
1790 oldScriptFile = iPtr->scriptFile;
1791 iPtr->scriptFile = pathPtr;
1792 Tcl_IncrRefCount(iPtr->scriptFile);
1798 iPtr->evalFlags |= TCL_EVAL_FILE;
1803 * iPtr->scriptFile value, so we must reset it without
1806 if (iPtr->scriptFile != NULL) {
1807 Tcl_DecrRefCount(iPtr->scriptFile);
1809 iPtr->scriptFile = oldScriptFile;
1812 result = TclUpdateReturnInfo(iPtr);