Lines Matching refs:objResultPtr
234 statePtr->objResultPtr = iPtr->objResultPtr;
235 iPtr->objResultPtr = Tcl_NewObj();
236 Tcl_IncrRefCount(iPtr->objResultPtr);
342 Tcl_DecrRefCount(iPtr->objResultPtr);
343 iPtr->objResultPtr = statePtr->objResultPtr;
369 TclDecrRefCount(statePtr->objResultPtr);
501 * interp->objResultPtr is left pointing to the object referenced by
503 * a new reference to it. The reference count for any old objResultPtr
517 register Tcl_Obj *oldObjResult = iPtr->objResultPtr;
519 iPtr->objResultPtr = objPtr;
572 Tcl_Obj *objResultPtr;
583 objResultPtr = iPtr->objResultPtr;
585 TclInitStringRep(objResultPtr, iPtr->result, length);
598 return iPtr->objResultPtr;
974 register Tcl_Obj *objResultPtr = iPtr->objResultPtr;
976 if (Tcl_IsShared(objResultPtr)) {
977 TclDecrRefCount(objResultPtr);
978 TclNewObj(objResultPtr);
979 Tcl_IncrRefCount(objResultPtr);
980 iPtr->objResultPtr = objResultPtr;
981 } else if (objResultPtr->bytes != tclEmptyStringRep) {
982 if (objResultPtr->bytes != NULL) {
983 ckfree((char *) objResultPtr->bytes);
985 objResultPtr->bytes = tclEmptyStringRep;
986 objResultPtr->length = 0;
987 TclFreeIntRep(objResultPtr);
988 objResultPtr->typePtr = NULL;