nil
.
new
.
program list; type intList = ^intListElem; intListElem = record val : integer; next : intList; end; var theList, node : intList; begin new(node); node^.val := 5; node^.next := nil; theList := node; new(node); node^.val := 12; node^.next := theList; theList := node end.