Sfoglia il codice sorgente

* ppc compilation fixed

florian 23 anni fa
parent
commit
5380652cad
2 ha cambiato i file con 11 aggiunte e 4 eliminazioni
  1. 5 2
      compiler/powerpc/agppcmpw.pas
  2. 6 2
      compiler/powerpc/cpupara.pas

+ 5 - 2
compiler/powerpc/agppcmpw.pas

@@ -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
 }

+ 6 - 2
compiler/powerpc/cpupara.pas

@@ -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