浏览代码

* reset subregister before writing mm register names

git-svn-id: trunk@8846 -
peter 18 年之前
父节点
当前提交
658d9fcc92
共有 1 个文件被更改,包括 2 次插入0 次删除
  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]