Lines Matching refs:objPtr
125 TclReleaseLiteral(interp, entryPtr->objPtr);
188 register Tcl_Obj *objPtr;
207 objPtr = localPtr->objPtr;
208 if ((objPtr->length == length) && ((length == 0)
209 || ((objPtr->bytes[0] == bytes[0])
210 && (memcmp(objPtr->bytes, bytes, (unsigned) length)
232 objPtr = globalPtr->objPtr;
233 if ((objPtr->length == length) && ((length == 0)
234 || ((objPtr->bytes[0] == bytes[0])
235 && (memcmp(objPtr->bytes, bytes, (unsigned) length)
264 TclNewObj(objPtr);
265 Tcl_IncrRefCount(objPtr);
267 objPtr->bytes = bytes;
268 objPtr->length = length;
270 TclInitStringRep(objPtr, bytes, length);
275 * From here we use the objPtr, because it is NULL terminated
277 if (TclGetLong((Tcl_Interp *) NULL, objPtr->bytes, &n) == TCL_OK) {
279 if (strcmp(objPtr->bytes, buf) == 0) {
280 objPtr->internalRep.longValue = n;
281 objPtr->typePtr = &tclIntType;
287 if (TclLookupLiteralEntry((Tcl_Interp *) iPtr, objPtr) != NULL) {
294 globalPtr->objPtr = objPtr;
321 && (entryPtr->objPtr == objPtr)) {
360 TclLookupLiteralEntry(interp, objPtr)
361 Tcl_Interp *interp; /* Interpreter for which objPtr was created
363 register Tcl_Obj *objPtr; /* Points to a Tcl object holding a
373 bytes = Tcl_GetStringFromObj(objPtr, &length);
377 if (entryPtr->objPtr == objPtr) {
407 Tcl_Interp *interp; /* Interpreter for which objPtr was created
429 newObjPtr = Tcl_DuplicateObj(lPtr->objPtr);
431 TclReleaseLiteral(interp, lPtr->objPtr);
432 lPtr->objPtr = newObjPtr;
473 TclAddLiteralObj(envPtr, objPtr, litPtrPtr)
476 Tcl_Obj *objPtr; /* The object to insert into the array. */
491 lPtr->objPtr = objPtr;
492 Tcl_IncrRefCount(objPtr);
536 objIndex = TclAddLiteralObj(envPtr, globalPtr->objPtr, &localPtr);
566 if (localPtr->objPtr == globalPtr->objPtr) {
572 bytes = Tcl_GetStringFromObj(globalPtr->objPtr, &length);
678 TclReleaseLiteral(interp, objPtr)
679 Tcl_Interp *interp; /* Interpreter for which objPtr was created
681 register Tcl_Obj *objPtr; /* Points to a literal object that was
692 bytes = Tcl_GetStringFromObj(objPtr, &length);
704 if (entryPtr->objPtr == objPtr) {
723 TclDecrRefCount(objPtr);
733 if (objPtr->typePtr == &tclByteCodeType) {
734 codePtr = (ByteCode *) objPtr->internalRep.otherValuePtr;
736 && (codePtr->objArrayPtr[0] == objPtr)) {
754 Tcl_DecrRefCount(objPtr);
866 bytes = Tcl_GetStringFromObj(entryPtr->objPtr, &length);
997 bytes = Tcl_GetStringFromObj(localPtr->objPtr, &length);
1003 localPtr->objPtr) == NULL) {
1004 bytes = Tcl_GetStringFromObj(localPtr->objPtr, &length);
1008 if (localPtr->objPtr->bytes == NULL) {
1053 bytes = Tcl_GetStringFromObj(globalPtr->objPtr, &length);
1058 if (globalPtr->objPtr->bytes == NULL) {