Selaa lähdekoodia

* fix false possitive tconstexprint range errors after r41441 (mantis #35144)

git-svn-id: trunk@41469 -
(cherry picked from commit eb71a309337d2629e5de488e0694798a6025029d)
Jonas Maebe 6 vuotta sitten
vanhempi
commit
b7b9c5d94c
1 muutettua tiedostoa jossa 2 lisäystä ja 2 poistoa
  1. 2 2
      compiler/ncgset.pas

+ 2 - 2
compiler/ncgset.pas

@@ -728,7 +728,7 @@ implementation
                 else
 {$endif}
                   begin
-                     hlcg.a_cmp_const_reg_label(current_asmdata.CurrAsmList, opsize, OC_EQ, tcgint(t^._low),hregister, blocklabel(t^.blockid));
+                     hlcg.a_cmp_const_reg_label(current_asmdata.CurrAsmList, opsize, OC_EQ, tcgint(t^._low.svalue),hregister, blocklabel(t^.blockid));
                   end;
                 { Reset last here, because we've only checked for one value and need to compare
                   for the next range both the lower and upper bound }
@@ -833,7 +833,7 @@ implementation
                      else
 {$endif}
                        begin
-                        hlcg.a_cmp_const_reg_label(current_asmdata.CurrAsmList, opsize, jmp_lt, tcgint(t^._low), hregister,
+                        hlcg.a_cmp_const_reg_label(current_asmdata.CurrAsmList, opsize, jmp_lt, tcgint(t^._low.svalue), hregister,
                            elselabel);
                        end;
                   end;