+ add tests to check for correct definition of the FPC_* mode defines

git-svn-id: trunk@43115 -

.gitattributes

@@ -12955,6 +12955,13 @@ tests/tbs/tb0655.pp svneol=native#text/pascal
 tests/tbs/tb0656.pp svneol=native#text/pascal
 tests/tbs/tb0657.pp svneol=native#text/pascal
 tests/tbs/tb0658.pp svneol=native#text/plain
+tests/tbs/tb0659a.pp svneol=native#text/pascal
+tests/tbs/tb0659b.pp svneol=native#text/pascal
+tests/tbs/tb0659c.pp svneol=native#text/pascal
+tests/tbs/tb0659d.pp svneol=native#text/pascal
+tests/tbs/tb0659e.pp svneol=native#text/pascal
+tests/tbs/tb0659f.pp svneol=native#text/pascal
+tests/tbs/tb0659g.pp svneol=native#text/pascal
 tests/tbs/tb205.pp svneol=native#text/plain
 tests/tbs/tb610.pp svneol=native#text/pascal
 tests/tbs/tb613.pp svneol=native#text/plain

tests/tbs/tb0659a.pp

@@ -0,0 +1,25 @@
+program tb0659a;
+
+{$mode fpc}
+
+{$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}
+{$ifdef FPC_ISO}
+{$fatal FPC_ISO defined}
+{$endif}
+{$ifdef FPC_EXTENDEDPASCAL}
+{$fatal FPC_EXTENDEDPASCAL defined}
+{$endif}
+
+begin
+end.

tests/tbs/tb0659b.pp

@@ -0,0 +1,25 @@
+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.

tests/tbs/tb0659c.pp

@@ -0,0 +1,25 @@
+program tb0659c;
+
+{$mode objfpc}
+
+{$ifdef FPC_TP}
+{$fatal FPC_TP defined}
+{$endif}
+{$ifndef FPC_OBJFPC}
+{$fatal FPC_OBJFPC not 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.

tests/tbs/tb0659d.pp

@@ -0,0 +1,25 @@
+program tb0659d;
+
+{$mode delphi}
+
+{$ifdef FPC_TP}
+{$fatal FPC_TP defined}
+{$endif}
+{$ifdef FPC_OBJFPC}
+{$fatal FPC_OBJFPC defined}
+{$endif}
+{$ifndef FPC_DELPHI}
+{$fatal FPC_DELPHI not 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.

tests/tbs/tb0659e.pp

@@ -0,0 +1,25 @@
+program tb0659e;
+
+{$mode macpas}
+
+{$ifdef FPC_TP}
+{$fatal FPC_TP defined}
+{$endif}
+{$ifdef FPC_OBJFPC}
+{$fatal FPC_OBJFPC defined}
+{$endif}
+{$ifdef FPC_DELPHI}
+{$fatal FPC_DELPHI defined}
+{$endif}
+{$ifndef FPC_MACPAS}
+{$fatal FPC_MACPAS not defined}
+{$endif}
+{$ifdef FPC_ISO}
+{$fatal FPC_ISO defined}
+{$endif}
+{$ifdef FPC_EXTENDEDPASCAL}
+{$fatal FPC_EXTENDEDPASCAL defined}
+{$endif}
+
+begin
+end.

tests/tbs/tb0659f.pp

@@ -0,0 +1,25 @@
+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.

tests/tbs/tb0659g.pp

@@ -0,0 +1,25 @@
+program tb0659g;
+
+{$mode extendedpascal}
+
+{$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}
+{$ifdef FPC_ISO}
+{$fatal FPC_ISO defined}
+{$endif}
+{$ifndef FPC_EXTENDEDPASCAL}
+{$fatal FPC_EXTENDEDPASCAL not defined}
+{$endif}
+
+begin
+end.