From 828a2482878027c93cfff250afc8b11e46fdb70f Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Wed, 3 Jul 2019 13:35:05 +0000
Subject: [PATCH]  Systematically include fpcdefs.inc at sart of all units used
 by compiler

git-svn-id: trunk@42322 -
---
 compiler/aarch64/cpuinfo.pas   | 2 ++
 compiler/arm/cpuinfo.pas       | 2 ++
 compiler/armgen/armpara.pas    | 2 +-
 compiler/avr/cpuinfo.pas       | 2 ++
 compiler/ccharset.pas          | 2 ++
 compiler/generic/cpuinfo.pas   | 2 ++
 compiler/jvm/cpuinfo.pas       | 2 ++
 compiler/m68k/cpuinfo.pas      | 2 ++
 compiler/macho.pas             | 4 +++-
 compiler/machoutils.pas        | 6 ++++--
 compiler/mips/cpuinfo.pas      | 2 ++
 compiler/pcp.pas               | 4 +++-
 compiler/powerpc/cpuinfo.pas   | 2 ++
 compiler/powerpc64/cpuinfo.pas | 2 ++
 compiler/riscv32/cpuinfo.pas   | 2 ++
 compiler/riscv64/cpuinfo.pas   | 2 ++
 compiler/systems/i_wii.pas     | 2 ++
 17 files changed, 37 insertions(+), 5 deletions(-)

diff --git a/compiler/aarch64/cpuinfo.pas b/compiler/aarch64/cpuinfo.pas
index 17afbc786a..53d5b6177c 100644
--- a/compiler/aarch64/cpuinfo.pas
+++ b/compiler/aarch64/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 Unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 Interface
 
   uses
diff --git a/compiler/arm/cpuinfo.pas b/compiler/arm/cpuinfo.pas
index e594901c0e..f0ab792d3b 100644
--- a/compiler/arm/cpuinfo.pas
+++ b/compiler/arm/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 Unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 Interface
 
   uses
diff --git a/compiler/armgen/armpara.pas b/compiler/armgen/armpara.pas
index 41a93ab725..a4deee4be1 100644
--- a/compiler/armgen/armpara.pas
+++ b/compiler/armgen/armpara.pas
@@ -20,7 +20,7 @@
 }
 unit armpara;
 
-{$mode objfpc}
+{$i fpcdefs.inc}
 
 interface
 
diff --git a/compiler/avr/cpuinfo.pas b/compiler/avr/cpuinfo.pas
index f410268d2f..a660593620 100644
--- a/compiler/avr/cpuinfo.pas
+++ b/compiler/avr/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 Unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 Interface
 
   uses
diff --git a/compiler/ccharset.pas b/compiler/ccharset.pas
index 2f7a0e1aee..99ee1831dd 100644
--- a/compiler/ccharset.pas
+++ b/compiler/ccharset.pas
@@ -16,6 +16,8 @@
 {$mode objfpc}
 unit ccharset;
 
+{$i fpcdefs.inc}
+
   interface
 
     type
diff --git a/compiler/generic/cpuinfo.pas b/compiler/generic/cpuinfo.pas
index f2cd3e7603..a9889c97c4 100644
--- a/compiler/generic/cpuinfo.pas
+++ b/compiler/generic/cpuinfo.pas
@@ -15,6 +15,8 @@
 
 Unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 Interface
 
   uses
diff --git a/compiler/jvm/cpuinfo.pas b/compiler/jvm/cpuinfo.pas
index e315d6cd4e..3cd6bd1fe9 100644
--- a/compiler/jvm/cpuinfo.pas
+++ b/compiler/jvm/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 Unit cpuinfo;
 
+{$i fpcdefs.inc}
+
 Interface
 
   uses
diff --git a/compiler/m68k/cpuinfo.pas b/compiler/m68k/cpuinfo.pas
index 88d6363883..4323a8d747 100644
--- a/compiler/m68k/cpuinfo.pas
+++ b/compiler/m68k/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 Unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 Interface
 
   uses
diff --git a/compiler/macho.pas b/compiler/macho.pas
index 8cc343b534..e832813093 100644
--- a/compiler/macho.pas
+++ b/compiler/macho.pas
@@ -24,7 +24,9 @@ unit macho;
 
 { converted by Dmitry Boyarintsev 2009 }
 
-{$mode objfpc}{$H+}
+{$i fpcdefs.inc}
+
+{$H+}
 
 interface
 
diff --git a/compiler/machoutils.pas b/compiler/machoutils.pas
index 691a2b7384..fb866be7ba 100644
--- a/compiler/machoutils.pas
+++ b/compiler/machoutils.pas
@@ -23,9 +23,11 @@
 
 unit machoutils;
 
-interface
+{$i fpcdefs.inc}
 
-{$mode objfpc}{$h+}
+{$h+}
+
+interface
 
 uses
   macho;
diff --git a/compiler/mips/cpuinfo.pas b/compiler/mips/cpuinfo.pas
index 22053f1361..146313136f 100644
--- a/compiler/mips/cpuinfo.pas
+++ b/compiler/mips/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 Unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 Interface
 
   uses
diff --git a/compiler/pcp.pas b/compiler/pcp.pas
index c03763edd8..5e2d816df3 100644
--- a/compiler/pcp.pas
+++ b/compiler/pcp.pas
@@ -21,7 +21,9 @@
 }
 unit pcp;
 
-{$mode objfpc}{$H+}
+{$i fpcdefs.inc}
+
+{$H+}
 
 interface
 
diff --git a/compiler/powerpc/cpuinfo.pas b/compiler/powerpc/cpuinfo.pas
index 5ac23b56a5..97c17544c7 100644
--- a/compiler/powerpc/cpuinfo.pas
+++ b/compiler/powerpc/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 Unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 Interface
 
   uses
diff --git a/compiler/powerpc64/cpuinfo.pas b/compiler/powerpc64/cpuinfo.pas
index 6d1f6b369a..968e2726d0 100644
--- a/compiler/powerpc64/cpuinfo.pas
+++ b/compiler/powerpc64/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 interface
 
 uses
diff --git a/compiler/riscv32/cpuinfo.pas b/compiler/riscv32/cpuinfo.pas
index 755da23976..5e481c1463 100644
--- a/compiler/riscv32/cpuinfo.pas
+++ b/compiler/riscv32/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 Unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 Interface
 
   uses
diff --git a/compiler/riscv64/cpuinfo.pas b/compiler/riscv64/cpuinfo.pas
index 91879a0b48..d4874e233e 100644
--- a/compiler/riscv64/cpuinfo.pas
+++ b/compiler/riscv64/cpuinfo.pas
@@ -14,6 +14,8 @@
 
 unit CPUInfo;
 
+{$i fpcdefs.inc}
+
 interface
 
 uses
diff --git a/compiler/systems/i_wii.pas b/compiler/systems/i_wii.pas
index b10086fb3d..ba30e44a0e 100644
--- a/compiler/systems/i_wii.pas
+++ b/compiler/systems/i_wii.pas
@@ -21,6 +21,8 @@
 { This unit implements support information structures for the Nintendo Wii. }
 unit i_wii;
 
+{$i fpcdefs.inc}
+
   interface
 
     uses