summaryrefslogtreecommitdiffstats
path: root/generic/tclIO.c
diff options
context:
space:
mode:
authordas <das>2009-09-07 07:28:38 (GMT)
committerdas <das>2009-09-07 07:28:38 (GMT)
commit71eeb99bfbfdcf1437799cb69d10b599f7633293 (patch)
tree9ce27be993bcf700cfffdd10f234b82b35f6c435 /generic/tclIO.c
parentc70d85c03e5455903df2df0534bb0a8ac25b32ac (diff)
downloadtcl-71eeb99bfbfdcf1437799cb69d10b599f7633293.zip
tcl-71eeb99bfbfdcf1437799cb69d10b599f7633293.tar.gz
tcl-71eeb99bfbfdcf1437799cb69d10b599f7633293.tar.bz2
* generic/tclExecute.c: fix potential uninitialized variable use and
* generic/tclFCmd.c: null dereference flagged by clang static * generic/tclProc.c: analyzer. * generic/tclTimer.c: * generic/tclUtf.c: * generic/tclExecute.c: silence false positives from clang static * generic/tclIO.c: analyzer about potential null dereference. * generic/tclScan.c: * generic/tclCompExpr.c:
Diffstat (limited to 'generic/tclIO.c')
-rw-r--r--generic/tclIO.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c
index 4f676e6..6ace57a 100644
--- a/generic/tclIO.c
+++ b/generic/tclIO.c
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclIO.c,v 1.160 2009/07/23 22:49:15 andreas_kupries Exp $
+ * RCS: @(#) $Id: tclIO.c,v 1.161 2009/09/07 07:28:38 das Exp $
*/
#include "tclInt.h"
@@ -8565,6 +8565,7 @@ DeleteScriptRecord(
if (esPtr == statePtr->scriptRecordPtr) {
statePtr->scriptRecordPtr = esPtr->nextPtr;
} else {
+ CLANG_ASSERT(prevEsPtr);
prevEsPtr->nextPtr = esPtr->nextPtr;
}