* reset subregister before writing mm register names

git-svn-id: trunk@8846 -
This commit is contained in:
peter 2007-10-18 21:52:04 +00:00
parent b4b38dfcd2
commit 658d9fcc92

View File

@ -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]