freepascal.compiler/tests/webtbf/tw2657.pp

{ %fail }

{ Source provided for Free Pascal Bug Report 2657 }
{ Submitted by "Mazen NEIFER" on  2003-08-28 }
{ e-mail: [email protected] }
program test;
type
  LongInt=record
    x,y:cardinal;
  end;
var
  t:longint;
begin
  t:=1;
end.