Browse Source

Add fpc_longword_to_double

git-svn-id: trunk@23185 -
pierre 12 years ago
parent
commit
14c5fceb45
1 changed files with 3 additions and 0 deletions
  1. 3 0
      rtl/inc/compproc.inc

+ 3 - 0
rtl/inc/compproc.inc

@@ -653,6 +653,9 @@ Procedure fpc_typed_read(TypeSize : Longint;var f : TypedFile;out Buf); compiler
 function fpc_int64_to_double(i: int64): double; compilerproc;
 function fpc_qword_to_double(q: qword): double; compilerproc;
 {$endif FPC_INCLUDE_SOFTWARE_INT64_TO_DOUBLE}
+{$ifdef FPC_INCLUDE_SOFTWARE_LONGWORD_TO_DOUBLE}
+function fpc_longword_to_double(i: longword): double; compilerproc;
+{$endif FPC_INCLUDE_SOFTWARE_LONGWORD_TO_DOUBLE}
 
 function fpc_setjmp(var s : jmp_buf) : longint; compilerproc;
 procedure fpc_longjmp(var s : jmp_buf; value : longint); compilerproc;