diff options
author | pooryorick <com.digitalsmarties@pooryorick.com> | 2016-07-28 19:46:14 (GMT) |
---|---|---|
committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2016-07-28 19:46:14 (GMT) |
commit | f1810dae6c5de7512c2d388b7631b7dc4a888928 (patch) | |
tree | e60efb74a579eedc3b7ff8635f0e328e50837187 | |
parent | f45faf8d9d3fca0e76d199068ef96385d5788bdc (diff) | |
download | tcl-f1810dae6c5de7512c2d388b7631b7dc4a888928.zip tcl-f1810dae6c5de7512c2d388b7631b7dc4a888928.tar.gz tcl-f1810dae6c5de7512c2d388b7631b7dc4a888928.tar.bz2 |
Remove left-over debugging code.
-rw-r--r-- | generic/tclThreadAlloc.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/generic/tclThreadAlloc.c b/generic/tclThreadAlloc.c index aa67895..12ce1c3 100644 --- a/generic/tclThreadAlloc.c +++ b/generic/tclThreadAlloc.c @@ -620,7 +620,6 @@ void TclThreadFreeObj( Tcl_Obj *objPtr) { - return; Cache *cachePtr; GETCACHE(cachePtr); @@ -631,9 +630,6 @@ TclThreadFreeObj( */ objPtr->internalRep.twoPtrValue.ptr1 = cachePtr->firstObjPtr; - if (objPtr == 0x1c19247) { - Tcl_WriteChars(Tcl_GetStdChannel(TCL_STDOUT), "helloGro", -1); - } cachePtr->firstObjPtr = objPtr; if (cachePtr->numObjects == 0) { cachePtr->lastPtr = objPtr; |