summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2012-02-06 19:12:24 (GMT)
committerdgp <dgp@users.sourceforge.net>2012-02-06 19:12:24 (GMT)
commitc24d7161999195800c8c642c949d60bf0fbd0fe7 (patch)
tree9329644647acddcdd40f476ade417af0ad6a502e /generic
parentf1c8f030d388e7462e9091166874e16af9e33ee6 (diff)
downloadtcl-c24d7161999195800c8c642c949d60bf0fbd0fe7.zip
tcl-c24d7161999195800c8c642c949d60bf0fbd0fe7.tar.gz
tcl-c24d7161999195800c8c642c949d60bf0fbd0fe7.tar.bz2
Honor per-namespace compile suppression in ensemble subcommands.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclEnsemble.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclEnsemble.c b/generic/tclEnsemble.c
index 59f38a9..1283446 100644
--- a/generic/tclEnsemble.c
+++ b/generic/tclEnsemble.c
@@ -2890,6 +2890,7 @@ TclCompileEnsemble(
cmdPtr = (Command *) Tcl_GetCommandFromObj(interp, targetCmdObj);
TclDecrRefCount(targetCmdObj);
if (cmdPtr == NULL || cmdPtr->compileProc == NULL
+ || cmdPtr->nsPtr->flags & NS_SUPPRESS_COMPILATION
|| cmdPtr->flags * CMD_HAS_EXEC_TRACES
|| ((Interp *)interp)->flags & DONT_COMPILE_CMDS_INLINE) {
/*