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

26 lines
391 B
ObjectPascal

program tb0659b;
{$mode tp}
{$ifndef FPC_TP}
{$fatal FPC_TP not 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}
{$ifdef FPC_ISO}
{$fatal FPC_ISO defined}
{$endif}
{$ifdef FPC_EXTENDEDPASCAL}
{$fatal FPC_EXTENDEDPASCAL defined}
{$endif}
begin
end.