Browse Source

* Fix defines for fpdoc

git-svn-id: trunk@46763 -
michael 4 years ago
parent
commit
a49c469a5d
1 changed files with 11 additions and 4 deletions
  1. 11 4
      rtl/objpas/math.pp

+ 11 - 4
rtl/objpas/math.pp

@@ -56,10 +56,6 @@ interface
        sysutils;
 
 {$IFDEF FPDOC_MATH}
-{$DEFINE FPC_HAS_TYPE_SINGLE}
-{$DEFINE FPC_HAS_TYPE_DOUBLE}
-{$DEFINE FPC_HAS_TYPE_EXTENDED}
-{$DEFINE FPC_HAS_TYPE_COMP}
 Type
   Float = MaxFloatType;
 
@@ -158,6 +154,17 @@ Const
        NegInfinity = -1.0/0.0;
 {$pop}
 
+
+{$IFDEF FPDOC_MATH}
+
+// This must be after the above defines.
+
+{$DEFINE FPC_HAS_TYPE_SINGLE}
+{$DEFINE FPC_HAS_TYPE_DOUBLE}
+{$DEFINE FPC_HAS_TYPE_EXTENDED}
+{$DEFINE FPC_HAS_TYPE_COMP}
+{$ENDIF}
+
 { Min/max determination }
 function MinIntValue(const Data: array of Integer): Integer;
 function MaxIntValue(const Data: array of Integer): Integer;