{ %fail }

{ Source provided for Free Pascal Bug Report 2795 }
{ Submitted by "marco" on  2003-11-17 }
{ e-mail:  }

begin
  exit (-1);
end.