diff options
| author | Eugen Wissner <belka@caraus.de> | 2026-07-11 22:33:03 +0200 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2026-07-11 22:33:03 +0200 |
| commit | 14d4977e2ab2409bb7344395ca01d19e49f130f1 (patch) | |
| tree | 5e08f1356a970b53f16ee554642eb555550d1491 /testsuite/compilable/assign_record_to_base.elna | |
| parent | b7dd49c1d5832ac7d82edba27316884ab53e614c (diff) | |
| download | elna-14d4977e2ab2409bb7344395ca01d19e49f130f1.tar.gz | |
Implement record extension
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. |