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

* fixed potentially wrong operation size in tgppccasenode.genlinearlist()
(was in practice currently probably always correct though)

git-svn-id: trunk@16737 -

Jonas Maebe 14 лет назад
Родитель
Сommit
a40fe9c078
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      compiler/ppcgen/ngppcset.pas

+ 1 - 1
compiler/ppcgen/ngppcset.pas

@@ -184,7 +184,7 @@ implementation
            if t^._low=t^._high then
            if t^._low=t^._high then
              begin
              begin
                 if t^._low-last=0 then
                 if t^._low-last=0 then
-                  cg.a_cmp_const_reg_label(current_asmdata.CurrAsmList, opsize, OC_EQ,0,hregister,blocklabel(t^.blockid))
+                  cg.a_cmp_const_reg_label(current_asmdata.CurrAsmList,OS_INT,OC_EQ,0,hregister,blocklabel(t^.blockid))
                 else
                 else
                   gensub(longint(int64(t^._low-last)));
                   gensub(longint(int64(t^._low-last)));
                 tcgppc(cg).a_jmp_cond(current_asmdata.CurrAsmList,OC_EQ,blocklabel(t^.blockid));
                 tcgppc(cg).a_jmp_cond(current_asmdata.CurrAsmList,OC_EQ,blocklabel(t^.blockid));