paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-06 14:28:01 +02:00
Code Issues Packages Projects Releases Wiki Activity

* another fix for min/max intrinsics on x86_64 for non constant/reference/register locations, resolves #40724

Browse Source
This commit is contained in:
florian 2024-04-03 22:03:30 +02:00
parent 8fa80295d0
commit 8cdb3deebd
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/x86/nx86inl.pas
View File

@ -1730,6 +1730,10 @@ implementation
hlcg.location_force_reg(current_asmdata.CurrAsmList,paraarray[1].location, hlcg.location_force_reg(current_asmdata.CurrAsmList,paraarray[1].location,
paraarray[1].resultdef,paraarray[1].resultdef,true); paraarray[1].resultdef,paraarray[1].resultdef,true);
if not(paraarray[2].location.loc in [LOC_REFERENCE,LOC_CREFERENCE,LOC_REGISTER,LOC_CREGISTER]) then
hlcg.location_force_reg(current_asmdata.CurrAsmList,paraarray[2].location,
paraarray[2].resultdef,paraarray[2].resultdef,true);
location_reset(location,LOC_REGISTER,paraarray[1].location.size); location_reset(location,LOC_REGISTER,paraarray[1].location.size);
location.register:=cg.getintregister(current_asmdata.CurrAsmList,location.size); location.register:=cg.getintregister(current_asmdata.CurrAsmList,location.size);