diff options
| author | Eugen Wissner <belka@caraus.de> | 2026-07-17 17:57:40 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2026-07-17 17:57:40 +0200 |
| commit | 349e84c693c1444606e877f4d8cdc1a39aa91634 (patch) | |
| tree | cd382dbac860cf8e78b8725a1c9b6ce9bc1fcd32 /testsuite | |
| parent | 4f260c5e98def6bd1b3498d4085de5080cca7641 (diff) | |
| download | elna-349e84c693c1444606e877f4d8cdc1a39aa91634.tar.gz | |
Reject const in const nesting
Diffstat (limited to 'testsuite')
| -rw-r--r-- | testsuite/compilable/const_alias.elna | 10 | ||||
| -rw-r--r-- | testsuite/fail_compilation/double_const.elna | 7 |
2 files changed, 17 insertions, 0 deletions
diff --git a/testsuite/compilable/const_alias.elna b/testsuite/compilable/const_alias.elna new file mode 100644 index 0000000..9cb9ffb --- /dev/null +++ b/testsuite/compilable/const_alias.elna @@ -0,0 +1,10 @@ +type + CI = const Int + CCI = const CI + +var + x: CCI + y: const CI + +begin +end. diff --git a/testsuite/fail_compilation/double_const.elna b/testsuite/fail_compilation/double_const.elna new file mode 100644 index 0000000..204a7f7 --- /dev/null +++ b/testsuite/fail_compilation/double_const.elna @@ -0,0 +1,7 @@ +proc f() +var + x: const const Int (* @Error Duplicate 'const' qualifier is not allowed *) +begin +return + +end. |