diff options
| author | dgp <dgp@users.sourceforge.net> | 2012-06-08 15:51:00 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2012-06-08 15:51:00 (GMT) |
| commit | f3f5448b0aa89dfc3c913d3f2e43e34e1c0c106c (patch) | |
| tree | 5766e5ea4a16d70c9458baf32001825441183f00 /generic/tclProc.c | |
| parent | 7e302d3ca75cd9eb6998e895cf344665b1d08e5e (diff) | |
| download | tcl-f3f5448b0aa89dfc3c913d3f2e43e34e1c0c106c.zip tcl-f3f5448b0aa89dfc3c913d3f2e43e34e1c0c106c.tar.gz tcl-f3f5448b0aa89dfc3c913d3f2e43e34e1c0c106c.tar.bz2 | |
Work in progress fixing 3532959
Diffstat (limited to 'generic/tclProc.c')
| -rw-r--r-- | generic/tclProc.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c index 43e88c6..325506b 100644 --- a/generic/tclProc.c +++ b/generic/tclProc.c @@ -2198,7 +2198,7 @@ TclProcCleanupProc( * the same ProcPtr is overwritten with a new CmdFrame. */ - if (!iPtr) { + if (iPtr == NULL || iPtr->linePBodyPtr == NULL) { return; } |