* fixed compilation on arm

git-svn-id: trunk@5070 -
This commit is contained in:
florian 2006-10-29 20:12:12 +00:00
parent 69a2144170
commit cd5861a01e

View File

@ -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);