Lines Matching refs:statePtr
79 InterpState *statePtr = (InterpState *)ckalloc(sizeof(InterpState));
81 statePtr->status = status;
82 statePtr->flags = iPtr->flags & ERR_ALREADY_LOGGED;
83 statePtr->returnLevel = iPtr->returnLevel;
84 statePtr->returnCode = iPtr->returnCode;
85 statePtr->errorInfo = iPtr->errorInfo;
86 if (statePtr->errorInfo) {
87 Tcl_IncrRefCount(statePtr->errorInfo);
89 statePtr->errorCode = iPtr->errorCode;
90 if (statePtr->errorCode) {
91 Tcl_IncrRefCount(statePtr->errorCode);
93 statePtr->returnOpts = iPtr->returnOpts;
94 if (statePtr->returnOpts) {
95 Tcl_IncrRefCount(statePtr->returnOpts);
97 statePtr->objResult = Tcl_GetObjResult(interp);
98 Tcl_IncrRefCount(statePtr->objResult);
99 return (Tcl_InterpState) statePtr;
127 InterpState *statePtr = (InterpState *)state;
128 int status = statePtr->status;
131 iPtr->flags |= (statePtr->flags & ERR_ALREADY_LOGGED);
133 iPtr->returnLevel = statePtr->returnLevel;
134 iPtr->returnCode = statePtr->returnCode;
138 iPtr->errorInfo = statePtr->errorInfo;
145 iPtr->errorCode = statePtr->errorCode;
152 iPtr->returnOpts = statePtr->returnOpts;
156 Tcl_SetObjResult(interp, statePtr->objResult);
183 InterpState *statePtr = (InterpState *)state;
185 if (statePtr->errorInfo) {
186 Tcl_DecrRefCount(statePtr->errorInfo);
188 if (statePtr->errorCode) {
189 Tcl_DecrRefCount(statePtr->errorCode);
191 if (statePtr->returnOpts) {
192 Tcl_DecrRefCount(statePtr->returnOpts);
194 Tcl_DecrRefCount(statePtr->objResult);
195 ckfree((char *) statePtr);
224 Tcl_SavedResult *statePtr) /* Pointer to state structure. */
234 statePtr->objResultPtr = iPtr->objResultPtr;
242 statePtr->freeProc = iPtr->freeProc;
248 statePtr->result = statePtr->resultSpace;
249 strcpy(statePtr->result, iPtr->result);
250 statePtr->appendResult = NULL;
256 statePtr->appendResult = iPtr->appendResult;
257 statePtr->appendAvl = iPtr->appendAvl;
258 statePtr->appendUsed = iPtr->appendUsed;
259 statePtr->result = statePtr->appendResult;
268 statePtr->result = iPtr->result;
269 statePtr->appendResult = NULL;
299 Tcl_SavedResult *statePtr) /* State returned by Tcl_SaveResult. */
309 iPtr->freeProc = statePtr->freeProc;
310 if (statePtr->result == statePtr->resultSpace) {
316 strcpy(iPtr->result, statePtr->result);
317 } else if (statePtr->result == statePtr->appendResult) {
326 iPtr->appendResult = statePtr->appendResult;
327 iPtr->appendAvl = statePtr->appendAvl;
328 iPtr->appendUsed = statePtr->appendUsed;
335 iPtr->result = statePtr->result;
343 iPtr->objResultPtr = statePtr->objResultPtr;
367 Tcl_SavedResult *statePtr) /* State returned by Tcl_SaveResult. */
369 TclDecrRefCount(statePtr->objResultPtr);
371 if (statePtr->result == statePtr->appendResult) {
372 ckfree(statePtr->appendResult);
373 } else if (statePtr->freeProc) {
374 if (statePtr->freeProc == TCL_DYNAMIC) {
375 ckfree(statePtr->result);
377 (*statePtr->freeProc)(statePtr->result);