diff options
Diffstat (limited to 'testsuite/runnable/case_constant_label.elna')
| -rw-r--r-- | testsuite/runnable/case_constant_label.elna | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/testsuite/runnable/case_constant_label.elna b/testsuite/runnable/case_constant_label.elna index 1b01736..3f7a483 100644 --- a/testsuite/runnable/case_constant_label.elna +++ b/testsuite/runnable/case_constant_label.elna @@ -1,14 +1,15 @@ program() +const + BASE = 2 + LIMIT = BASE var - base: const Int := 2 - limit: const Int := base x: Int := 2 matched: Bool := false begin case x of 1: assert(false) - | limit: matched := true + | LIMIT: matched := true end; assert(matched) end. |