Explorar o código

* reset subregister before writing mm register names

git-svn-id: trunk@8846 -
peter %!s(int64=18) %!d(string=hai) anos
pai
achega
658d9fcc92
Modificáronse 1 ficheiros con 2 adicións e 0 borrados
  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]