diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-05-24 20:16:10 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-05-24 20:16:10 (GMT) |
| commit | 76b6abb07e94280e27b013d5c2610b67776aa6a1 (patch) | |
| tree | 9017fe11b364e0f8f2b0fcd6830e3ffef2bafe79 /generic/tclEnsemble.c | |
| parent | c0771697239c868133d1f53442b91259ab58cf25 (diff) | |
| download | tcl-76b6abb07e94280e27b013d5c2610b67776aa6a1.zip tcl-76b6abb07e94280e27b013d5c2610b67776aa6a1.tar.gz tcl-76b6abb07e94280e27b013d5c2610b67776aa6a1.tar.bz2 | |
New test namespace-53.11 demonstrates the bug.
Diffstat (limited to 'generic/tclEnsemble.c')
| -rw-r--r-- | generic/tclEnsemble.c | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/generic/tclEnsemble.c b/generic/tclEnsemble.c index c947459..c85828b 100644 --- a/generic/tclEnsemble.c +++ b/generic/tclEnsemble.c @@ -12,7 +12,6 @@ #include "tclInt.h" #include "tclCompile.h" -#include "assert.h" /* * Declarations for functions local to this file: @@ -1892,13 +1891,8 @@ NsEnsembleImplementationCmdNR( * relative to old one. */ if (ni > 0) { iPtr->ensembleRewrite.numRemovedObjs += ni; -fprintf(stdout, "%d == %d\n", -iPtr->ensembleRewrite.numInsertedObjs - 1, -ensemblePtr->numParameters); -fflush(stdout); -assert(iPtr->ensembleRewrite.numInsertedObjs - 1 == ensemblePtr->numParameters); - iPtr->ensembleRewrite.numInsertedObjs += prefixObjc-1; +// iPtr->ensembleRewrite.numInsertedObjs = prefixObjc + ensemblePtr->numParameters; } else { iPtr->ensembleRewrite.numInsertedObjs += prefixObjc-2; } |