freepascal.compiler/tests/tbf/tb0018.pp

{ %FAIL }
{ Old file: tbf0108.pp }
{ gives wrong error message                             OK 0.99.1 (PFV) }

uses
  dos,
  ;
begin
end.