From a2a1572db8439aebcbdceb3228fd51974d4ae201 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 24 Apr 2004 18:31:25 +0000
Subject: [PATCH]   * trunc and round for x86-64 fixed

---
 rtl/x86_64/math.inc | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/rtl/x86_64/math.inc b/rtl/x86_64/math.inc
index 1dcabfb011..6cc924a06d 100644
--- a/rtl/x86_64/math.inc
+++ b/rtl/x86_64/math.inc
@@ -144,10 +144,9 @@
             fwait
             fldt d
             fistpq res
-            movl res,%eax
-            movl res+4,%edx
+            movq res,%rax
             fldcw oldcw
-      end ['EAX','ECX','EDX'];
+      end ['RAX','RCX'];
 
 
     {$define FPC_SYSTEM_HAS_ROUND}
@@ -170,10 +169,9 @@
             fwait
             fldt d
             fistpq res
-            movl res,%eax
-            movl res+4,%edx
+            movq res,%rax
             fldcw oldcw
-      end ['EAX','EDX'];
+      end ['RAX'];
 
 
     {$define FPC_SYSTEM_HAS_POWER}
@@ -198,7 +196,10 @@
 
 {
   $Log$
-  Revision 1.3  2004-02-06 15:58:21  florian
+  Revision 1.4  2004-04-24 18:31:25  florian
+    * trunc and round for x86-64 fixed
+
+  Revision 1.3  2004/02/06 15:58:21  florian
     * fixed x86-64 assembler problems
 
   Revision 1.2  2004/02/05 01:16:12  florian
@@ -206,4 +207,4 @@
 
   Revision 1.1  2003/04/30 22:11:06  florian
     + for a lot of x86-64 dependend files mostly dummies added
-}
\ No newline at end of file
+}