summaryrefslogtreecommitdiff
path: root/tests/exprsugar.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/exprsugar.test')
-rw-r--r--tests/exprsugar.test5
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/exprsugar.test b/tests/exprsugar.test
index 9579203..943945a 100644
--- a/tests/exprsugar.test
+++ b/tests/exprsugar.test
@@ -48,5 +48,10 @@ test exprsugar-1.11 {Simple operations} {
test exprsugar-1.12 {Simple operations} {
set x $((2 + 4))
} 6
+# This necessary to ensure that things like exit will pass through expr-sugar
+test exprsugar-1.13 {Non-error return inside expr-sugar} -body {
+ proc a {} { break }
+ set x $([a])
+} -returnCodes break
testreport