diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-05 21:33:49 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-05 21:33:49 (GMT) |
commit | 618c49af4d299c9f0d776e604a1c81dd186b3b2d (patch) | |
tree | fc7a3f45cef9a2370191f49217d52f8701daba92 /generic/tclCompile.c | |
parent | 87b0db4d91332f8bf1bd7a58e9a5fb73cc31d8ae (diff) | |
download | tcl-618c49af4d299c9f0d776e604a1c81dd186b3b2d.zip tcl-618c49af4d299c9f0d776e604a1c81dd186b3b2d.tar.gz tcl-618c49af4d299c9f0d776e604a1c81dd186b3b2d.tar.bz2 |
Backout [c1a376375e0e6488]: imported namespace ensemble command name distorted during deletion trace on the import.
According to Travis, there's a memory leak which needs to be fixed first.
Diffstat (limited to 'generic/tclCompile.c')
-rw-r--r-- | generic/tclCompile.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index 7d67e12..fd63da3 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -1834,7 +1834,7 @@ CompileCmdLiteral( bytes = TclGetStringFromObj(cmdObj, &numBytes); cmdLitIdx = TclRegisterLiteral(envPtr, bytes, numBytes, extraLiteralFlags); - if (cmdPtr && TclRoutineHasName(cmdPtr)) { + if (cmdPtr) { TclSetCmdNameObj(interp, TclFetchLiteral(envPtr, cmdLitIdx), cmdPtr); } TclEmitPush(cmdLitIdx, envPtr); |