diff options
| author | Eugen Wissner <belka@caraus.de> | 2026-07-07 21:39:57 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2026-07-07 21:39:57 +0200 |
| commit | 79521d91b2bb85652fd29f5c44279338d55c757f (patch) | |
| tree | d3b5b73177f63fd5ff684a8aba6f7b9af84dab27 /testsuite/runnable/return_aggregate.elna | |
| parent | 470bfba45661d19558c0bf43b7819696a925ecb4 (diff) | |
| download | elna-79521d91b2bb85652fd29f5c44279338d55c757f.tar.gz | |
Allow multiple parameters with same type
Diffstat (limited to 'testsuite/runnable/return_aggregate.elna')
| -rw-r--r-- | testsuite/runnable/return_aggregate.elna | 16 |
1 files changed, 3 insertions, 13 deletions
diff --git a/testsuite/runnable/return_aggregate.elna b/testsuite/runnable/return_aggregate.elna index 54d833d..fc37565 100644 --- a/testsuite/runnable/return_aggregate.elna +++ b/testsuite/runnable/return_aggregate.elna @@ -4,22 +4,12 @@ type b: Int end -proc g() -> R +proc f(): R return R(1, 2) end -proc f() -> Int -var - result: Int begin - if g() = R(1, 2) then - result := 0 - else - result := 1 - end; - return result -end - -return f() + assert(f() = R(1, 2)); + return 0 end. |
