浏览代码

* fixed typo in define

florian 21 年之前
父节点
当前提交
72f65a379f
共有 1 个文件被更改,包括 7 次插入4 次删除
  1. 7 4
      compiler/globals.pas

+ 7 - 4
compiler/globals.pas

@@ -84,19 +84,19 @@ interface
        MathNegInf : tdoublearray = (0,0,240,255,0,0,0,0);
        MathNegInf : tdoublearray = (0,0,240,255,0,0,0,0);
        MathPi : tdoublearray =  (251,33,9,64,24,45,68,84);
        MathPi : tdoublearray =  (251,33,9,64,24,45,68,84);
 {$else}
 {$else}
-{$ifdef CPU_LITTLE_ENDIAN}
+{$ifdef FPC_LITTLE_ENDIAN}
        MathQNaN : tdoublearray = (0,0,0,0,0,0,252,255);
        MathQNaN : tdoublearray = (0,0,0,0,0,0,252,255);
        MathInf : tdoublearray = (0,0,0,0,0,0,240,127);
        MathInf : tdoublearray = (0,0,0,0,0,0,240,127);
        MathNegInf : tdoublearray = (0,0,0,0,0,0,240,255);
        MathNegInf : tdoublearray = (0,0,0,0,0,0,240,255);
        MathPi : tdoublearray =  (24,45,68,84,251,33,9,64);
        MathPi : tdoublearray =  (24,45,68,84,251,33,9,64);
        MathPiExtended : textendedarray = (53,194,104,33,162,218,15,201,0,64);
        MathPiExtended : textendedarray = (53,194,104,33,162,218,15,201,0,64);
-{$else CPU_LITTLE_ENDIAN}
+{$else FPC_LITTLE_ENDIAN}
        MathQNaN : tdoublearray = (255,252,0,0,0,0,0,0);
        MathQNaN : tdoublearray = (255,252,0,0,0,0,0,0);
        MathInf : tdoublearray = (127,240,0,0,0,0,0,0);
        MathInf : tdoublearray = (127,240,0,0,0,0,0,0);
        MathNegInf : tdoublearray = (255,240,0,0,0,0,0,0);
        MathNegInf : tdoublearray = (255,240,0,0,0,0,0,0);
        MathPi : tdoublearray =  (64,9,33,251,84,68,45,24);
        MathPi : tdoublearray =  (64,9,33,251,84,68,45,24);
        MathPiExtended : textendedarray = (64,0,201,15,218,162,33,104,194,53);
        MathPiExtended : textendedarray = (64,0,201,15,218,162,33,104,194,53);
-{$endif CPU_LITTLE_ENDIAN}
+{$endif FPC_LITTLE_ENDIAN}
 {$endif}
 {$endif}
 
 
     type
     type
@@ -2291,7 +2291,10 @@ end;
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.169  2005-02-06 21:33:28  peter
+  Revision 1.170  2005-02-07 21:30:25  florian
+    * fixed typo in define
+
+  Revision 1.169  2005/02/06 21:33:28  peter
     * -Fa option added, it'll load the units before the uses
     * -Fa option added, it'll load the units before the uses
       line is parsed. Can be used to load cthreads from the commandline.
       line is parsed. Can be used to load cthreads from the commandline.
       Example '-g -Faheaptrc,lineinfo' is the same as '-ghl'
       Example '-g -Faheaptrc,lineinfo' is the same as '-ghl'