paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 06:29:38 +02:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
git-svn-id: trunk@41469 -
This commit is contained in:
Jonas Maebe 2019-02-25 20:48:49 +00:00
parent 3857f343d8
commit eb71a30933
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/ncgset.pas
View File

@ -827,7 +827,7 @@ implementation
{$endif} {$endif}
{$endif cpuhighleveltarget} {$endif cpuhighleveltarget}
begin 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; end;
{ Reset last here, because we've only checked for one value and need to compare { 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 } for the next range both the lower and upper bound }
@ -934,7 +934,7 @@ implementation
{$endif} {$endif}
{$endif cpuhighleveltarget} {$endif cpuhighleveltarget}
begin 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); elselabel);
end; end;
end; end;