Merged revisions 6751 via svnmerge from

http://svn.freepascal.org/svn/fpc/trunk

r6751 (ivost)
    * fixed InterlockedCompareExchange(64) of x86_64.inc (I dont know if win64 version is wrong also!)

git-svn-id: branches/fixes_2_2@6797 -

rtl/x86_64/x86_64.inc

@@ -486,9 +486,9 @@ asm
         lock
         cmpxchgl        %r8d,(%rcx)
 {$else win64}
-        movl            %esi,%eax
+        movl            %edx,%eax
         lock
-        cmpxchgl        %edx,(%rdi)
+        cmpxchgl        %esi,(%rdi)
 {$endif win64}
 end;
 
@@ -558,9 +558,9 @@ asm
         lock
         cmpxchgq        %r8d,(%rcx)
 {$else win64}
-        movq            %rsi,%rax
+        movq            %rdx,%rax
         lock
-        cmpxchgq        %rdx,(%rdi)
+        cmpxchgq        %rsi,(%rdi)
 {$endif win64}
 end;