fpc/tests/tbs/tb0659f.pp
2019-10-03 12:34:42 +00:00

26 lines
392 B
ObjectPascal

program tb0659f;
{$mode iso}
{$ifdef FPC_TP}
{$fatal FPC_TP defined}
{$endif}
{$ifdef FPC_OBJFPC}
{$fatal FPC_OBJFPC defined}
{$endif}
{$ifdef FPC_DELPHI}
{$fatal FPC_DELPHI defined}
{$endif}
{$ifdef FPC_MACPAS}
{$fatal FPC_MACPAS defined}
{$endif}
{$ifndef FPC_ISO}
{$fatal FPC_ISO not defined}
{$endif}
{$ifdef FPC_EXTENDEDPASCAL}
{$fatal FPC_EXTENDEDPASCAL defined}
{$endif}
begin
end.