(* this program badly needs comments *) (* see if you can remember what we said about it in class *) program testLinkedList (input, output); type myPointer = ^myRecord; myRecord = record value : integer; next : myPointer; end; var record1, record2 : myRecord; begin end.