Browse Source

+ Used macros ABI_AIX and ABI_SYSV exchanged to FPC_ABI_AIX and FPC_ABI_SYSV.

olle 22 years ago
parent
commit
103019fb39
1 changed files with 12 additions and 9 deletions
  1. 12 9
      rtl/powerpc/powerpc.inc

+ 12 - 9
rtl/powerpc/powerpc.inc

@@ -349,7 +349,7 @@ end;
 Procedure FillChar(var x;count:longint;value:byte);assembler;
 Procedure FillChar(var x;count:longint;value:byte);assembler;
 { input: x in r3, count in r4, value in r5 }
 { input: x in r3, count in r4, value in r5 }
 
 
-{$ifndef ABI_AIX}
+{$ifndef FPC_ABI_AIX}
 { in the AIX ABI, we can use te red zone for temp storage, otherwise we have }
 { in the AIX ABI, we can use te red zone for temp storage, otherwise we have }
 { to explicitely allocate room                                               }
 { to explicitely allocate room                                               }
 var
 var
@@ -358,7 +358,7 @@ var
       0: (l1,l2: longint);
       0: (l1,l2: longint);
       1: (d: double);
       1: (d: double);
     end;
     end;
-{$endif ABI_AIX}
+{$endif FPC_ABI_AIX}
 asm
 asm
         { no bytes? }
         { no bytes? }
         cmpwi     cr6,r4,0
         cmpwi     cr6,r4,0
@@ -429,15 +429,15 @@ LFillCharDCBZLoop:
         beq       LFillCharDone
         beq       LFillCharDone
         b         LFillCharVerySmall
         b         LFillCharVerySmall
 LFillCharNoZero:
 LFillCharNoZero:
-{$ifdef ABI_AIX}
+{$ifdef FPC_ABI_AIX}
         stw       r5,0(sp)
         stw       r5,0(sp)
         stw       r5,4(sp)
         stw       r5,4(sp)
         lfd       f0,0(sp)
         lfd       f0,0(sp)
-{$else ABI_AIX}
+{$else FPC_ABI_AIX}
         stw       r5,temp
         stw       r5,temp
         stw       r5,4+temp
         stw       r5,4+temp
         lfd       f0,temp
         lfd       f0,temp
-{$endif ABI_AIX}
+{$endif FPC_ABI_AIX}
         { make r3 point to address-8, so we're able to use fp double stores }
         { make r3 point to address-8, so we're able to use fp double stores }
         { with update (it's already -4 now)                                 }
         { with update (it's already -4 now)                                 }
         subi      r3,r3,4
         subi      r3,r3,4
@@ -874,11 +874,11 @@ asm
    lwz r3,0(r3)
    lwz r3,0(r3)
    cmplwi  r3,0
    cmplwi  r3,0
    beq     Lcaller_addr_frame_null
    beq     Lcaller_addr_frame_null
-{$ifdef ABI_AIX}
+{$ifdef FPC_ABI_AIX}
    lwz r3,8(r3)
    lwz r3,8(r3)
-{$else}
+{$else FPC_ABI_AIX}
    lwz r3,4(r3)
    lwz r3,4(r3)
-{$endif}
+{$endif FPC_ABI_AIX}
 Lcaller_addr_frame_null:
 Lcaller_addr_frame_null:
 end;
 end;
 
 
@@ -966,7 +966,10 @@ end;
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.52  2003-08-24 20:47:49  olle
+  Revision 1.53  2003-09-06 10:44:41  olle
+    + Used macros ABI_AIX and ABI_SYSV exchanged to FPC_ABI_AIX and FPC_ABI_SYSV.
+
+  Revision 1.52  2003/08/24 20:47:49  olle
     + added support for ABI_AIX in get_caller_addr
     + added support for ABI_AIX in get_caller_addr
 
 
   Revision 1.51  2003/06/14 12:41:08  jonas
   Revision 1.51  2003/06/14 12:41:08  jonas