Browse Source

* fixed compilation on arm

git-svn-id: trunk@5070 -
florian 19 năm trước cách đây
mục cha
commit
cd5861a01e
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  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);