Explorar el Código

* do not call a_load_reg_reg with tosize=OS_NO

git-svn-id: trunk@37055 -
florian hace 8 años
padre
commit
4d5a94644f
Se han modificado 1 ficheros con 2 adiciones y 0 borrados
  1. 2 0
      compiler/cgobj.pas

+ 2 - 0
compiler/cgobj.pas

@@ -1110,6 +1110,8 @@ implementation
                     original register had to be made larger to be able to hold
                     the shifted value }
                   cgsize:=int_cgsize(tcgsize2size[OS_INT]-(-paraloc.shiftval div 8));
+                  if cgsize=OS_NO then
+                    cgsize:=OS_INT;
                   hreg:=getintregister(list,cgsize);
                   a_load_reg_reg(list,OS_INT,cgsize,paraloc.register,hreg);
                 end;