fpc/tests/tbf/tb0105.pp

11 lines
95 B
ObjectPascal

{ %fail }
type
trec = record l1,l2,l3 : longint end;
const
r: trec = (l2:5);
begin
end.