diff options
Diffstat (limited to 'testsuite/runnable')
| -rw-r--r-- | testsuite/runnable/aggregate_argument.elna | 2 | ||||
| -rw-r--r-- | testsuite/runnable/aggregate_equality.elna | 2 | ||||
| -rw-r--r-- | testsuite/runnable/define_multiple_local_variables.elna | 2 | ||||
| -rw-r--r-- | testsuite/runnable/multi_module/helper.elna | 2 | ||||
| -rw-r--r-- | testsuite/runnable/procedure_cast.elna | 6 | ||||
| -rw-r--r-- | testsuite/runnable/recursive_record.elna | 6 | ||||
| -rw-r--r-- | testsuite/runnable/return_aggregate.elna | 2 | ||||
| -rw-r--r-- | testsuite/runnable/two_fields_same_type.elna | 2 | ||||
| -rw-r--r-- | testsuite/runnable/two_parameters_same_type.elna | 2 | ||||
| -rw-r--r-- | testsuite/runnable/unary_plus.elna | 2 |
10 files changed, 14 insertions, 14 deletions
diff --git a/testsuite/runnable/aggregate_argument.elna b/testsuite/runnable/aggregate_argument.elna index 4a36c74..875265e 100644 --- a/testsuite/runnable/aggregate_argument.elna +++ b/testsuite/runnable/aggregate_argument.elna @@ -4,7 +4,7 @@ type b: Int end -proc f(r: R): Bool +proc f(r: R) -> Bool return r.a = 1 & r.b = 2 begin diff --git a/testsuite/runnable/aggregate_equality.elna b/testsuite/runnable/aggregate_equality.elna index 592d411..bfe2174 100644 --- a/testsuite/runnable/aggregate_equality.elna +++ b/testsuite/runnable/aggregate_equality.elna @@ -4,7 +4,7 @@ type b: Int end -proc f(): Bool +proc f() -> Bool return R{a: 1, b: 2} = R{a: 1, b: 2} begin diff --git a/testsuite/runnable/define_multiple_local_variables.elna b/testsuite/runnable/define_multiple_local_variables.elna index 51b99ac..8e44da4 100644 --- a/testsuite/runnable/define_multiple_local_variables.elna +++ b/testsuite/runnable/define_multiple_local_variables.elna @@ -1,4 +1,4 @@ -proc f(): Bool +proc f() -> Bool var a, b: Int := 5 return a = 5 & b = 5 diff --git a/testsuite/runnable/multi_module/helper.elna b/testsuite/runnable/multi_module/helper.elna index 9148ba6..5fd68af 100644 --- a/testsuite/runnable/multi_module/helper.elna +++ b/testsuite/runnable/multi_module/helper.elna @@ -1,4 +1,4 @@ -proc multiply*(x, y: Int): Int +proc multiply*(x, y: Int) -> Int return x * y end. diff --git a/testsuite/runnable/procedure_cast.elna b/testsuite/runnable/procedure_cast.elna index 27977e1..ee97a6b 100644 --- a/testsuite/runnable/procedure_cast.elna +++ b/testsuite/runnable/procedure_cast.elna @@ -1,9 +1,9 @@ -var cb: proc(x: ^Char): Int +var cb: proc(x: ^Char) -> Int -proc probe_int(x: ^Int): Int +proc probe_int(x: ^Int) -> Int return 42 begin - cb := cast(probe_int: proc(x: ^Char): Int); + cb := cast(probe_int: proc(x: ^Char) -> Int); assert(cb(nil) = 42) end. 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)); diff --git a/testsuite/runnable/return_aggregate.elna b/testsuite/runnable/return_aggregate.elna index 90c1677..fbc1a08 100644 --- a/testsuite/runnable/return_aggregate.elna +++ b/testsuite/runnable/return_aggregate.elna @@ -4,7 +4,7 @@ type b: Int end -proc f(): R +proc f() -> R return R{ a: 1, b: 2 } begin diff --git a/testsuite/runnable/two_fields_same_type.elna b/testsuite/runnable/two_fields_same_type.elna index 649dd25..71dcbee 100644 --- a/testsuite/runnable/two_fields_same_type.elna +++ b/testsuite/runnable/two_fields_same_type.elna @@ -3,7 +3,7 @@ type x, y: Int end -proc f(): Int +proc f() -> Int var r: R := R{x: 3, y: 2} return r.x + r.y diff --git a/testsuite/runnable/two_parameters_same_type.elna b/testsuite/runnable/two_parameters_same_type.elna index bd9b271..105a40c 100644 --- a/testsuite/runnable/two_parameters_same_type.elna +++ b/testsuite/runnable/two_parameters_same_type.elna @@ -1,4 +1,4 @@ -proc f(x, y: Int): Int +proc f(x, y: Int) -> Int return x + y begin diff --git a/testsuite/runnable/unary_plus.elna b/testsuite/runnable/unary_plus.elna index 2bc69f3..bfd59d6 100644 --- a/testsuite/runnable/unary_plus.elna +++ b/testsuite/runnable/unary_plus.elna @@ -1,4 +1,4 @@ -proc f(x: Int): Int +proc f(x: Int) -> Int return +x begin |
