diff options
author | dgp <dgp@users.sourceforge.net> | 2013-08-22 16:13:29 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2013-08-22 16:13:29 (GMT) |
commit | 8173bccfd9b158ecd9f10dd7d9978a2b287fdcfe (patch) | |
tree | b1f47864a1e6d2f2a2c460cf028ff2fee383f490 | |
parent | a5b75dfa9a6ddadcf9f6a864bc47a1b5e69daed5 (diff) | |
download | tcl-8173bccfd9b158ecd9f10dd7d9978a2b287fdcfe.zip tcl-8173bccfd9b158ecd9f10dd7d9978a2b287fdcfe.tar.gz tcl-8173bccfd9b158ecd9f10dd7d9978a2b287fdcfe.tar.bz2 |
Remove assertion that is not true in some circumstances (--enable-dtrace).
-rw-r--r-- | generic/tclExecute.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index d066476..96004e2 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -8798,8 +8798,7 @@ TclGetSrcInfoForPc( &cfPtr->len, NULL, NULL); } - assert(cfPtr->cmd != NULL); - { + if (cfPtr->cmd != NULL) { /* * We now have the command. We can get the srcOffset back and from * there find the list of word locations for this command. |