diff options
Diffstat (limited to 'testsuite/runnable/recursive_record.elna')
| -rw-r--r-- | testsuite/runnable/recursive_record.elna | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/testsuite/runnable/recursive_record.elna b/testsuite/runnable/recursive_record.elna index 6f6b4fa..237eece 100644 --- a/testsuite/runnable/recursive_record.elna +++ b/testsuite/runnable/recursive_record.elna @@ -9,13 +9,13 @@ var second: ^Node third: ^Node -proc malloc(size: Word): Pointer +proc malloc(size: Word) -> Pointer extern proc free(ptr: Pointer) extern -proc sum(node: ^Node): Int +proc sum(node: ^Node) -> Int var result: Int begin @@ -25,7 +25,7 @@ begin else result := node^.value + sum(node^.next) end; - return result +return result begin first := malloc(#size(Node)); |
