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

* a_loadfpu_ref_cgpara: use the paralocation instead of the cgpara size

Browse Source 
when loading an fpu register, can be different in case of a record
    that needs to be passed in an fpu register

git-svn-id: trunk@34030 -
This commit is contained in:
Jonas Maebe 2016-06-30 15:33:34 +00:00
parent eeae34ea7d
commit 214aea8853
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/hlcgobj.pas
View File

@ -2551,7 +2551,7 @@ implementation
begin begin
cgpara.check_simple_location; cgpara.check_simple_location;
paramanager.alloccgpara(list,cgpara); paramanager.alloccgpara(list,cgpara);
a_loadfpu_ref_reg(list,fromsize,cgpara.def,ref,cgpara.location^.register); a_loadfpu_ref_reg(list,fromsize,cgpara.location^.def,ref,cgpara.location^.register);
end; end;
LOC_REFERENCE,LOC_CREFERENCE: LOC_REFERENCE,LOC_CREFERENCE:
begin begin