diff options
| author | Eugen Wissner <belka@caraus.de> | 2026-09-16 11:49:35 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2026-09-16 11:49:35 +0200 |
| commit | b575036fe804f14b78da74897a74b010cc94f730 (patch) | |
| tree | 054dcb6e932bc8cf5faf2a0158794913fc6e8be3 /testsuite/runnable/named_block.elna | |
| parent | 52c8ca2c06da93c8d14e80a256e8996c1fa1e885 (diff) | |
| download | elna-b575036fe804f14b78da74897a74b010cc94f730.tar.gz | |
Implement named blocks
Diffstat (limited to 'testsuite/runnable/named_block.elna')
| -rw-r--r-- | testsuite/runnable/named_block.elna | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/testsuite/runnable/named_block.elna b/testsuite/runnable/named_block.elna new file mode 100644 index 0000000..a9c44ed --- /dev/null +++ b/testsuite/runnable/named_block.elna @@ -0,0 +1,18 @@ +var + counter: Int := 0 + +program() +begin + block outer + while true do + defer + counter := counter + 10 + end; + counter := counter + 1; + break outer + end + end; + assert(counter = 11) +return 0u8 + +end. |