From: Jeff R. <dv...@us...> - 2014-07-08 02:07:41
|
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 ---- |