Przeglądaj źródła

* patch by Christo Crause: fix for r43136

git-svn-id: trunk@43169 -
florian 5 lat temu
rodzic
commit
5fc12500f2
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      compiler/avr/cgcpu.pas

+ 1 - 1
compiler/avr/cgcpu.pas

@@ -513,7 +513,7 @@ unit cgcpu;
                            if op=OP_SHL then
                            if op=OP_SHL then
                              list.concat(taicpu.op_reg(A_ROL,GetOffsetReg64(dst,NR_NO,i-1)))
                              list.concat(taicpu.op_reg(A_ROL,GetOffsetReg64(dst,NR_NO,i-1)))
                            else
                            else
-                             list.concat(taicpu.op_reg(A_ROR,GetOffsetReg64(dst,NR_NO,tcgsize2size[size]-i-b)));
+                             list.concat(taicpu.op_reg(A_ROR,GetOffsetReg64(dst,NR_NO,tcgsize2size[size]-i)));
                        end;
                        end;
                      list.concat(taicpu.op_reg(A_DEC,countreg));
                      list.concat(taicpu.op_reg(A_DEC,countreg));
                      a_jmp_flags(list,F_NE,l1);
                      a_jmp_flags(list,F_NE,l1);