Почему тогда это не работает:
## Код:
```
IMPORT StdLog;

TYPE
   Field = POINTER TO RECORD 
      i: INTEGER;
   END;
   MyC = POINTER TO RECORD
      top: Field;
   END;

PROCEDURE Sea (m: MyC);
VAR
   c: Field;
BEGIN
   m.top := c;
   c.i := 1024;
END Sea;

PROCEDURE Start*;   
VAR
   v: MyC;
BEGIN
   NEW (v);
   NEW (v.top);
   Sea (v);
   StdLog.Ln;
   StdLog.Int (v.top.i)
END Start;
```
?