diff options
Diffstat (limited to 'testsuite/compilable/assign_record_to_base.elna')
| -rw-r--r-- | testsuite/compilable/assign_record_to_base.elna | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/testsuite/compilable/assign_record_to_base.elna b/testsuite/compilable/assign_record_to_base.elna new file mode 100644 index 0000000..7583c70 --- /dev/null +++ b/testsuite/compilable/assign_record_to_base.elna @@ -0,0 +1,16 @@ +type + B = record + x: Int + end + R = record(B) + y: Int + end + +var + x: ^B := nil + y: ^R := nil + +begin + x := y; + return 0 +end. |