mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-17 22:49:23 +02:00
- removed darwin/i386 special case code from i8086 code generator
git-svn-id: trunk@30204 -
This commit is contained in:
parent
9788b01d31
commit
2e126bb723
@ -286,15 +286,6 @@ unit cpupara;
|
|||||||
usedef:=p.returndef
|
usedef:=p.returndef
|
||||||
else
|
else
|
||||||
usedef:=forcetempdef;
|
usedef:=forcetempdef;
|
||||||
{ on darwin/i386, if a record has only one field and that field is a
|
|
||||||
single or double, it has to be returned like a single/double }
|
|
||||||
if (target_info.system in [system_i386_darwin,system_i386_iphonesim]) and
|
|
||||||
((usedef.typ=recorddef) or
|
|
||||||
is_object(usedef)) and
|
|
||||||
tabstractrecordsymtable(tabstractrecorddef(usedef).symtable).has_single_field(sym) and
|
|
||||||
(sym.vardef.typ=floatdef) and
|
|
||||||
(tfloatdef(sym.vardef).floattype in [s32real,s64real]) then
|
|
||||||
usedef:=sym.vardef;
|
|
||||||
|
|
||||||
handled:=set_common_funcretloc_info(p,usedef,retcgsize,result);
|
handled:=set_common_funcretloc_info(p,usedef,retcgsize,result);
|
||||||
{ normally forcetempdef is passed straight through to
|
{ normally forcetempdef is passed straight through to
|
||||||
|
Loading…
Reference in New Issue
Block a user