diff options
| author | Eugen Wissner <belka@caraus.de> | 2026-07-13 18:14:45 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2026-07-13 18:14:45 +0200 |
| commit | 500c0676b3f6cd5a2297987d5b0dc7ccf34a28d9 (patch) | |
| tree | a394c73de9273489e6045f3d252714b5ac69b17c /testsuite | |
| parent | 97741a01323021ccec8b0b60c6f8318c88ac373a (diff) | |
| download | elna-500c0676b3f6cd5a2297987d5b0dc7ccf34a28d9.tar.gz | |
Make return statement part of the body and not a statement
Diffstat (limited to 'testsuite')
| -rw-r--r-- | testsuite/compilable/pointer_cast.elna | 4 | ||||
| -rw-r--r-- | testsuite/fail_compilation/module_without_return.elna | 6 |
2 files changed, 9 insertions, 1 deletions
diff --git a/testsuite/compilable/pointer_cast.elna b/testsuite/compilable/pointer_cast.elna index d10fb23..64b99ca 100644 --- a/testsuite/compilable/pointer_cast.elna +++ b/testsuite/compilable/pointer_cast.elna @@ -4,5 +4,7 @@ var begin p := c; - c := p + c := p; + + return 0 end. diff --git a/testsuite/fail_compilation/module_without_return.elna b/testsuite/fail_compilation/module_without_return.elna new file mode 100644 index 0000000..f2ece07 --- /dev/null +++ b/testsuite/fail_compilation/module_without_return.elna @@ -0,0 +1,6 @@ +var (* @Error Procedure 'module' is expected to return, but does not have a return statement *) + x: Int + +begin + x := 42 +end. |