Update of /cvsroot/aolserver/aolserver/nsd
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv18266
Modified Files:
tclcache.c
Log Message:
Fixed panic when running against a tcl build with TCL_COMPILE_DEBUG.
A SetFromAny proc should not invalidate an existing stringrep, which
SetCacheFromAny was doing.
Index: tclcache.c
===================================================================
RCS file: /cvsroot/aolserver/aolserver/nsd/tclcache.c,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** tclcache.c 5 Jul 2011 18:37:47 -0000 1.5
--- tclcache.c 8 Jul 2014 02:07:38 -0000 1.6
***************
*** 730,735 ****
objPtr->typePtr = &cacheType;
objPtr->internalRep.otherValuePtr = cachePtr;
- Tcl_InvalidateStringRep(objPtr);
- objPtr->length = 0; /* ensure there's no stumbling */
return TCL_OK;
}
--- 730,733 ----
|
