Browse Source

* fixed loading/storing of unaligned bitfields of size 2 to 7 bits

git-svn-id: trunk@6619 -
Jonas Maebe 18 years ago
parent
commit
25576b49ac
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/cgobj.pas

+ 1 - 1
compiler/cgobj.pas

@@ -1157,7 +1157,7 @@ implementation
           internalerror(2006081312);
 
         extra_load :=
-          (intloadsize <> 1) and
+          (sref.bitlen <> 1) and
           ((sref.bitindexreg <> NR_NO) or
            (byte(sref.startbit+sref.bitlen) > byte(intloadsize*8)));
       end;