From 3554fac953c92adf1186752ca06a548fbbf5db7e Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 27 Mar 2004 23:23:03 +0000
Subject: [PATCH]   + added FPC_COMP_IS_INT64 define

---
 compiler/options.pas | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/compiler/options.pas b/compiler/options.pas
index 7ae6eb374b..1f046e867e 100644
--- a/compiler/options.pas
+++ b/compiler/options.pas
@@ -1728,6 +1728,7 @@ begin
   def_symbol('CPU68K');
   def_symbol('CPU32');
   def_symbol('FPC_CURRENCY_IS_INT64');
+  def_symbol('FPC_COMP_IS_INT64');
 {$endif}
 {$ifdef ALPHA}
   def_symbol('CPUALPHA');
@@ -1741,6 +1742,7 @@ begin
   def_symbol('FPC_HAS_TYPE_SINGLE');
   def_symbol('FPC_INCLUDE_SOFTWARE_INT64_TO_DOUBLE');
   def_symbol('FPC_CURRENCY_IS_INT64');
+  def_symbol('FPC_COMP_IS_INT64');
 {$endif}
 {$ifdef iA64}
   def_symbol('CPUIA64');
@@ -1763,6 +1765,7 @@ begin
   def_symbol('FPC_HAS_TYPE_SINGLE');
   def_symbol('FPC_INCLUDE_SOFTWARE_INT64_TO_DOUBLE');
   def_symbol('FPC_CURRENCY_IS_INT64');
+  def_symbol('FPC_COMP_IS_INT64');
 {$endif}
 {$ifdef vis}
   def_symbol('CPUVIS');
@@ -1774,6 +1777,7 @@ begin
   def_symbol('FPC_HAS_TYPE_DOUBLE');
   def_symbol('FPC_HAS_TYPE_SINGLE');
   def_symbol('FPC_CURRENCY_IS_INT64');
+  def_symbol('FPC_COMP_IS_INT64');
   def_symbol('FPC_REQUIRES_PROPER_ALIGNMENT');
 {$endif arm}
 
@@ -2035,7 +2039,10 @@ finalization
 end.
 {
   $Log$
-  Revision 1.130  2004-03-23 22:34:49  peter
+  Revision 1.131  2004-03-27 23:23:03  florian
+    + added FPC_COMP_IS_INT64 define
+
+  Revision 1.130  2004/03/23 22:34:49  peter
     * constants ordinals now always have a type assigned
     * integer constants have the smallest type, unsigned prefered over
       signed