Sfoglia il codice sorgente

* don't write rex twice

git-svn-id: trunk@4525 -
florian 19 anni fa
parent
commit
e1d1f92672
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      compiler/x86/aasmcpu.pas

+ 1 - 1
compiler/x86/aasmcpu.pas

@@ -2001,7 +2001,7 @@ implementation
 {$ifdef x86_64}
 {$ifdef x86_64}
        procedure maybewriterex;
        procedure maybewriterex;
        begin
        begin
-          if rex<>0 then
+          if (rex<>0) and not(rexwritten) then
             begin
             begin
               rexwritten:=true;
               rexwritten:=true;
               objdata.writebytes(rex,1);
               objdata.writebytes(rex,1);