{ Old file: tbs0177.pp } { program.symbol not allowed (almost the same as bugs 176) OK 0.99.9 (PM) } program p; var l : longint; begin p.l:=1; end.