diff options
Diffstat (limited to 'testsuite/compilable')
| -rw-r--r-- | testsuite/compilable/assign_record_to_base.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/const_alias.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/const_element_array.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/const_extern.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/const_negation.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/const_var_chain.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/empty_proc_type_expression.elna | 4 | ||||
| -rw-r--r-- | testsuite/compilable/opaque_type.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/pointer_cast.elna | 3 | ||||
| -rw-r--r-- | testsuite/compilable/pointer_const_conversion.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/self-referencing-record.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/take_const_address.elna | 1 | ||||
| -rw-r--r-- | testsuite/compilable/traits_size.elna | 1 |
13 files changed, 13 insertions, 5 deletions
diff --git a/testsuite/compilable/assign_record_to_base.elna b/testsuite/compilable/assign_record_to_base.elna index fb28e7b..7601d06 100644 --- a/testsuite/compilable/assign_record_to_base.elna +++ b/testsuite/compilable/assign_record_to_base.elna @@ -10,6 +10,7 @@ var x: ^B := nil y: ^R := nil +program() begin x := y; end. diff --git a/testsuite/compilable/const_alias.elna b/testsuite/compilable/const_alias.elna index e17c55f..3a6b365 100644 --- a/testsuite/compilable/const_alias.elna +++ b/testsuite/compilable/const_alias.elna @@ -6,5 +6,4 @@ var x: CCI := 8 y: const CI := 9 -begin end. diff --git a/testsuite/compilable/const_element_array.elna b/testsuite/compilable/const_element_array.elna index a812d23..2d68ff5 100644 --- a/testsuite/compilable/const_element_array.elna +++ b/testsuite/compilable/const_element_array.elna @@ -5,5 +5,4 @@ var a: [3]CI := [1, 2, 3] b: [3]CI -begin end. diff --git a/testsuite/compilable/const_extern.elna b/testsuite/compilable/const_extern.elna index 8df801e..9e8fbb0 100644 --- a/testsuite/compilable/const_extern.elna +++ b/testsuite/compilable/const_extern.elna @@ -1,5 +1,4 @@ var errno_like: const Int := extern -begin end. diff --git a/testsuite/compilable/const_negation.elna b/testsuite/compilable/const_negation.elna index a62cc1e..cb76e58 100644 --- a/testsuite/compilable/const_negation.elna +++ b/testsuite/compilable/const_negation.elna @@ -2,6 +2,7 @@ var x: const Int := -5 y: const Int := -x +program() begin assert(x = -5); assert(y = 5); diff --git a/testsuite/compilable/const_var_chain.elna b/testsuite/compilable/const_var_chain.elna index a6db8c8..5a3623f 100644 --- a/testsuite/compilable/const_var_chain.elna +++ b/testsuite/compilable/const_var_chain.elna @@ -2,6 +2,7 @@ var x: const Int := 42 y: Int := x +program() begin assert(y = 42) end. diff --git a/testsuite/compilable/empty_proc_type_expression.elna b/testsuite/compilable/empty_proc_type_expression.elna index ad959f3..7738cae 100644 --- a/testsuite/compilable/empty_proc_type_expression.elna +++ b/testsuite/compilable/empty_proc_type_expression.elna @@ -1,2 +1,4 @@ -type P = proc() +type + P = proc() + end. diff --git a/testsuite/compilable/opaque_type.elna b/testsuite/compilable/opaque_type.elna index bdbf0d6..fdb2928 100644 --- a/testsuite/compilable/opaque_type.elna +++ b/testsuite/compilable/opaque_type.elna @@ -9,6 +9,7 @@ var proc take(h: ^Handle) -> ^Handle return h +program() begin alias := take(handle) end. diff --git a/testsuite/compilable/pointer_cast.elna b/testsuite/compilable/pointer_cast.elna index ab4b071..3807d69 100644 --- a/testsuite/compilable/pointer_cast.elna +++ b/testsuite/compilable/pointer_cast.elna @@ -2,7 +2,8 @@ var c: ^Char := nil p: Pointer := nil +program() begin p := c; - c := p; + c := p end. diff --git a/testsuite/compilable/pointer_const_conversion.elna b/testsuite/compilable/pointer_const_conversion.elna index fd8e097..d2328ae 100644 --- a/testsuite/compilable/pointer_const_conversion.elna +++ b/testsuite/compilable/pointer_const_conversion.elna @@ -2,6 +2,7 @@ var x: Int p: ^const Int +program() begin p := @x end. diff --git a/testsuite/compilable/self-referencing-record.elna b/testsuite/compilable/self-referencing-record.elna index cc98f86..311f148 100644 --- a/testsuite/compilable/self-referencing-record.elna +++ b/testsuite/compilable/self-referencing-record.elna @@ -2,4 +2,5 @@ type R = record field: ^R end + end. diff --git a/testsuite/compilable/take_const_address.elna b/testsuite/compilable/take_const_address.elna index f8c9e5c..71c8e0b 100644 --- a/testsuite/compilable/take_const_address.elna +++ b/testsuite/compilable/take_const_address.elna @@ -2,6 +2,7 @@ var x: ^const Int y: const Int := 1 +program() begin x := @y end. diff --git a/testsuite/compilable/traits_size.elna b/testsuite/compilable/traits_size.elna index 523045f..7ee46f1 100644 --- a/testsuite/compilable/traits_size.elna +++ b/testsuite/compilable/traits_size.elna @@ -5,6 +5,7 @@ var as: Int := cast(#size([10]Int): Int) p: Int := cast(#size(Pointer): Int) +program() begin assert(s > 0); assert(as = 10 * cast(#size(Int): Int)); |
