mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-20 21:09:24 +02:00
* ppc compilation fixed
This commit is contained in:
parent
048c281e79
commit
5380652cad
@ -23,7 +23,7 @@
|
||||
{
|
||||
This unit implements an asmoutput class for PowerPC with MPW syntax
|
||||
}
|
||||
unit agppcmpwt;
|
||||
unit agppcmpw;
|
||||
|
||||
{$i fpcdefs.inc}
|
||||
|
||||
@ -739,7 +739,10 @@ initialization
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.1 2002-08-20 21:40:44 florian
|
||||
Revision 1.2 2002-08-31 12:43:31 florian
|
||||
* ppc compilation fixed
|
||||
|
||||
Revision 1.1 2002/08/20 21:40:44 florian
|
||||
+ target macos for ppc added
|
||||
+ frame work for mpw assembler output
|
||||
}
|
||||
|
@ -42,6 +42,7 @@ unit cpupara;
|
||||
|
||||
uses
|
||||
verbose,
|
||||
globtype,
|
||||
cpuinfo,cginfo,
|
||||
symtype,defbase;
|
||||
|
||||
@ -186,7 +187,7 @@ unit cpupara;
|
||||
LOC_REFERENCE:
|
||||
begin
|
||||
hp.paraloc.size:=OS_32;
|
||||
if push_addr_param(hp.paratype.def) or (hp.paratyp in [vs_var,vs_out]) then
|
||||
if push_addr_param(hp.paratype.def,p.proccalloption in [pocall_cdecl,pocall_cppdecl]) or (hp.paratyp in [vs_var,vs_out]) then
|
||||
begin
|
||||
if nextintreg<=R_8 then
|
||||
begin
|
||||
@ -227,7 +228,10 @@ begin
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.8 2002-08-18 10:42:38 florian
|
||||
Revision 1.9 2002-08-31 12:43:31 florian
|
||||
* ppc compilation fixed
|
||||
|
||||
Revision 1.8 2002/08/18 10:42:38 florian
|
||||
* remaining assembler writer bugs fixed, the errors in the
|
||||
system unit are inline assembler problems
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user