diff options
Diffstat (limited to 'testsuite/runnable')
| -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. |
