Преглед изворни кода

* fixed compilation on arm

git-svn-id: trunk@5070 -
florian пре 19 година
родитељ
комит
cd5861a01e
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      rtl/inc/genmath.inc

+ 1 - 1
rtl/inc/genmath.inc

@@ -676,7 +676,7 @@ type
      * to produce the hexadecimal values shown.
      *
     }
-    function fpc_exp_real(d: Double):Double;compilerproc;
+    function fpc_exp_real(d: ValReal):ValReal;compilerproc;
       const
         one   = 1.0;
         halF : array[0..1] of double = (0.5,-0.5);