Prechádzať zdrojové kódy

Merged revisions 2743 via svnmerge from
svn+ssh://[email protected]/FPC/svn/fpc/trunk

........
r2743 | jonas | 2006-03-04 22:37:19 +0100 (Sat, 04 Mar 2006) | 2 lines

* fixed bug in r2738

........

git-svn-id: branches/fixes_2_0@2744 -

Jonas Maebe 19 rokov pred
rodič
commit
bffe7ba3cd
1 zmenil súbory, kde vykonal 3 pridanie a 3 odobranie
  1. 3 3
      compiler/ncgmem.pas

+ 3 - 3
compiler/ncgmem.pas

@@ -746,6 +746,9 @@ implementation
                end;
               secondpass(right);
               
+              { if mulsize = 1, we won't have to modify the index }
+              location_force_reg(exprasmlist,right.location,OS_ADDR,(mulsize = 1));
+
               if isjump then
                begin
                  truelabel:=otl;
@@ -754,9 +757,6 @@ implementation
               else if (right.location.loc = LOC_JUMP) then
                 internalerror(2006010801);
 
-              { if mulsize = 1, we won't have to modify the index }
-              location_force_reg(exprasmlist,right.location,OS_ADDR,(mulsize = 1));
-
               { only range check now, we can't range check loc_flags/loc_jump }
               if cs_check_range in aktlocalswitches then
                begin