freepascal.compiler/tests/ts010100.pp

var
   o : tobject;

begin
   halt(1);
end.