diff options
Diffstat (limited to 'testsuite/runnable')
| -rw-r--r-- | testsuite/runnable/case_constant_label.elna | 7 | ||||
| -rw-r--r-- | testsuite/runnable/compile_time_array_access.elna | 8 | ||||
| -rw-r--r-- | testsuite/runnable/inferred_variable.elna | 4 |
3 files changed, 10 insertions, 9 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. diff --git a/testsuite/runnable/compile_time_array_access.elna b/testsuite/runnable/compile_time_array_access.elna index 5ce10a0..146fd27 100644 --- a/testsuite/runnable/compile_time_array_access.elna +++ b/testsuite/runnable/compile_time_array_access.elna @@ -1,8 +1,8 @@ program() -var - array: const [3]Int := [1, 2, 3] - i: const Int := array[2] +const + ARRAY = [1, 2, 3] + I = ARRAY[2] begin - assert(i = 2) + assert(I = 2) end. diff --git a/testsuite/runnable/inferred_variable.elna b/testsuite/runnable/inferred_variable.elna index 48d7414..edc3399 100644 --- a/testsuite/runnable/inferred_variable.elna +++ b/testsuite/runnable/inferred_variable.elna @@ -2,8 +2,8 @@ program() var x := 42 c: const := 10 - y := c - arr := [c, 2] + y := 10 + arr := [10, 2] begin x := x + 1; |
