Просмотр исходного кода

* fixed thlcg2ll.location_force_mmregscalar() after r40633

git-svn-id: trunk@40810 -
Jonas Maebe 6 лет назад
Родитель
Сommit
2b3fb18327
1 измененных файлов с 1 добавлено и 0 удалено
  1. 1 0
      compiler/hlcg2ll.pas

+ 1 - 0
compiler/hlcg2ll.pas

@@ -1297,6 +1297,7 @@ implementation
                reg:=getmmregister(list,newsize);
                reg:=getmmregister(list,newsize);
                a_loadmm_loc_reg(list,size,newsize,l,reg,mms_movescalar);
                a_loadmm_loc_reg(list,size,newsize,l,reg,mms_movescalar);
                l.size:=def_cgsize(newsize);
                l.size:=def_cgsize(newsize);
+               size:=newsize;
              end;
              end;
           location_freetemp(list,l);
           location_freetemp(list,l);
           location_reset(l,LOC_MMREGISTER,l.size);
           location_reset(l,LOC_MMREGISTER,l.size);