* fixed qword_to_double conversion on powerpc

rtl/inc/systemh.inc

@@ -123,6 +123,8 @@ Type
   {$define SUPPORT_SINGLE}
   {$define SUPPORT_DOUBLE}
 
+  {$define FPC_INCLUDE_SOFTWARE_INT64_TO_DOUBLE}
+
   ValSInt = Longint;
   ValUInt = Cardinal;
   ValReal = Double;
@@ -690,7 +692,10 @@ const
 
 {
   $Log$
-  Revision 1.71  2003-09-03 14:09:37  florian
+  Revision 1.72  2003-09-04 16:07:31  florian
+    * fixed qword_to_double conversion on powerpc
+
+  Revision 1.71  2003/09/03 14:09:37  florian
     * arm fixes to the common rtl code
     * some generic math code fixed
     * ...

rtl/powerpc/math.inc

@@ -386,6 +386,7 @@ asm
 end;
 
 
+{$define FPC_SYSTEM_HAS_QWORD_TO_DOUBLE}
 function fpc_qword_to_double(q: qword): double; compilerproc;
 assembler;
 { input: high(q) in r4, low(q) in r3 }
@@ -425,7 +426,10 @@ end;
 
 {
   $Log$
-  Revision 1.28  2003-09-03 14:09:37  florian
+  Revision 1.29  2003-09-04 16:07:31  florian
+    * fixed qword_to_double conversion on powerpc
+
+  Revision 1.28  2003/09/03 14:09:37  florian
     * arm fixes to the common rtl code
     * some generic math code fixed
     * ...