diff --git a/Test5.obn b/Test5.obn
index 248d688013c8e3c239e60536032741a8fe114a25..c92a3988517f433606078e5bcb01521fea95b0b3 100644 (file)
--- a/Test5.obn
+++ b/Test5.obn
P1 = POINTER TO R1;
P2 = POINTER TO R2;
+ P3 = POINTER TO R3;
VAR
a : R1;
c : R3;
p1 : P1;
p2 : P2;
+ p3 : P3;
BEGIN
a := b;
p2 := p1(P2);
- p1 := p2(P2);
+ p1 := p2;
+ p3 := p3;
END Test5.