freepascal.compiler/tests/tbs/tb0243.pp

{ Old file: tbs0284b.pp }
{  }

unit tb0243;
interface
type
  o1=object
    p : longint;
  end;

implementation
end.