Ver código fonte

* reset subregister before writing mm register names

git-svn-id: trunk@8846 -
peter 18 anos atrás
pai
commit
658d9fcc92
1 arquivos alterados com 2 adições e 0 exclusões
  1. 2 0
      compiler/x86/cpubase.pas

+ 2 - 0
compiler/x86/cpubase.pas

@@ -451,6 +451,8 @@ implementation
       var
         p : tregisterindex;
       begin
+        if getregtype(r) in [R_MMREGISTER,R_MMXREGISTER] then
+          r:=newreg(getregtype(r),getsupreg(r),R_SUBNONE);
         p:=findreg_by_number_table(r,regnumber_index);
         if p<>0 then
           result:=std_regname_table[p]