summaryrefslogtreecommitdiffstats
path: root/tests/for.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/for.test')
-rw-r--r--tests/for.test13
1 files changed, 13 insertions, 0 deletions
diff --git a/tests/for.test b/tests/for.test
index 8f19e9f..ff4dc0e 100644
--- a/tests/for.test
+++ b/tests/for.test
@@ -197,6 +197,19 @@ test for-2.6 {continue tests, long command body} {
}
set a
} {1 3}
+test for-2.7 {continue tests, uncompiled [for]} -body {
+ set file [makeFile {
+ set guard 0
+ for {set i 20} {$i > 0} {incr i -1} {
+ if {[incr guard]>30} {return BAD}
+ continue
+ }
+ return GOOD
+ } source.file]
+ source $file
+} -cleanup {
+ removeFile source.file
+} -result GOOD
# Check "for" and "break".