diff options
author | dgp <dgp@users.sourceforge.net> | 2018-03-20 19:58:27 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2018-03-20 19:58:27 (GMT) |
commit | 84fe9556f16e74048a1e8925a62752fb7c134548 (patch) | |
tree | a642c54a1c96eec0164e289ca8b4e93d02290a26 /tests/compile.test | |
parent | c20405e576563963285be603c62d279d09601e1f (diff) | |
parent | 919a1c67abeedd115bc8a34850ff2c8c1ade3ab8 (diff) | |
download | tcl-84fe9556f16e74048a1e8925a62752fb7c134548.zip tcl-84fe9556f16e74048a1e8925a62752fb7c134548.tar.gz tcl-84fe9556f16e74048a1e8925a62752fb7c134548.tar.bz2 |
merge 8.7
Diffstat (limited to 'tests/compile.test')
-rw-r--r-- | tests/compile.test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/compile.test b/tests/compile.test index c76bd82..c8d4f02 100644 --- a/tests/compile.test +++ b/tests/compile.test @@ -499,7 +499,8 @@ test compile-15.5 {proper TCL_RETURN code from [return]} { apply {{} {catch {set a 1}; return}} } "" -for {set noComp 0} {$noComp <= 1} {incr noComp} { +# Do all tests once byte compiled and once with direct string evaluation +foreach noComp {0 1} { if $noComp { interp alias {} run {} testevalex |