From bae521b2936f66b9fc8d0c6b5ea8b86580ae813a Mon Sep 17 00:00:00 2001
From: pier <cpier83@gmail.com>
Date: Mon, 4 Nov 2013 17:08:20 +0100
Subject: [PATCH] Update x64.inc

fixed x64 floating point argument passing. see #29 and #32
---
 Source/x64.inc | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/Source/x64.inc b/Source/x64.inc
index a0dcc63..5bbb5a8 100644
--- a/Source/x64.inc
+++ b/Source/x64.inc
@@ -55,7 +55,8 @@ asm
   movd xmm2,_XMM2
   movd xmm3,_XMM3
   {$ELSE}
-  movsd xmm0,[_XMM0]
+  mov rax, [_XMM0]
+  movsd xmm0, qword ptr [rax]
   movsd xmm1,_XMM1
   movsd xmm2,_XMM2
   movsd xmm3,_XMM3
@@ -79,7 +80,8 @@ asm
 {$IFDEF FPC}
   movd [_XMM0],xmm0
 {$ELSE}
-  movsd [_XMM0],xmm0
+  mov rax, [_XMM0]
+  movsd qword ptr [rax], xmm0
 {$ENDIF}
 
   pop r9