{ %skiptarget=android }

{ This test checks whether the 'extradefines' from compiler/system/i_*.pas   }
{ are defined before the configuration file is parsed, together with tw9450a }

{$i+}
var
  t: text;
begin
  assign(t,'tw9450a.cfg');
  rewrite(t);
  writeln(t,'-vw');
{$ifdef unix}
  writeln(t,'#ifndef unix');
  writeln(t,'#error Unix not defined in config file');
  writeln(t,'#endif');
{$else}
{$ifdef windows}
  writeln(t,'#ifndef windows');
  writeln(t,'#error Windows not defined in config file');
  writeln(t,'#endif');
{$else}
{$ifdef dpmi}
  writeln(t,'#ifndef dpmi');
  writeln(t,'#error DPMI not defined in config file');
  writeln(t,'#endif');
{$endif}
{$endif}
{$endif}
  close(t);
end.
