Commit 3e86b595 by David Edelsohn Committed by David Edelsohn

aix.S: Cleanup whitespaces.

        * src/powerpc/aix.S: Cleanup whitespaces.
        * src/powerpc/aix_closure.S: Likewise.

From-SVN: r71542
parent dba601db
2003-09-18 David Edelsohn <edelsohn@gnu.org>
* src/powerpc/aix.S: Cleanup whitespaces.
* src/powerpc/aix_closure.S: Likewise.
2003-09-18 Andreas Tobler <a.tobler@schweiz.ch> 2003-09-18 Andreas Tobler <a.tobler@schweiz.ch>
* src/powerpc/darwin.S: Cleanup whitespaces, comment formatting. * src/powerpc/darwin.S: Cleanup whitespaces, comment formatting.
......
/* ----------------------------------------------------------------------- /* -----------------------------------------------------------------------
aix.S - Copyright (c) 2002 Free Software Foundation, Inc. aix.S - Copyright (c) 2002 Free Software Foundation, Inc.
based on darwin.S by John Hornkvist based on darwin.S by John Hornkvist
PowerPC Assembly glue. PowerPC Assembly glue.
Permission is hereby granted, free of charge, to any person obtaining Permission is hereby granted, free of charge, to any person obtaining
...@@ -121,7 +121,7 @@ ffi_call_AIX: ...@@ -121,7 +121,7 @@ ffi_call_AIX:
mr r30,r6 /* rvalue, */ mr r30,r6 /* rvalue, */
mr r29,r7 /* function address, */ mr r29,r7 /* function address, */
mr r28,r8 /* our AP. */ mr r28,r8 /* our AP. */
/* Call ffi_prep_args. */ /* Call ffi_prep_args. */
mr r4,r1 mr r4,r1
li r9,0 li r9,0
...@@ -140,16 +140,16 @@ ffi_call_AIX: ...@@ -140,16 +140,16 @@ ffi_call_AIX:
mtctr r12 mtctr r12
lwz r2,4(r29) lwz r2,4(r29)
/* Load all those argument registers. */ /* Load all those argument registers. */
// We have set up a nice stack frame, just load it into registers. // We have set up a nice stack frame, just load it into registers.
lwz r3, 20+(1*4)(r1) lwz r3, 20+(1*4)(r1)
lwz r4, 20+(2*4)(r1) lwz r4, 20+(2*4)(r1)
lwz r5, 20+(3*4)(r1) lwz r5, 20+(3*4)(r1)
lwz r6, 20+(4*4)(r1) lwz r6, 20+(4*4)(r1)
nop nop
lwz r7, 20+(5*4)(r1) lwz r7, 20+(5*4)(r1)
lwz r8, 20+(6*4)(r1) lwz r8, 20+(6*4)(r1)
lwz r9, 20+(7*4)(r1) lwz r9, 20+(7*4)(r1)
lwz r10,20+(8*4)(r1) lwz r10,20+(8*4)(r1)
L1: L1:
/* Load all the FP registers. */ /* Load all the FP registers. */
...@@ -165,17 +165,17 @@ L1: ...@@ -165,17 +165,17 @@ L1:
lfd f8,-16-(6*8)(r28) lfd f8,-16-(6*8)(r28)
nop nop
lfd f9,-16-(5*8)(r28) lfd f9,-16-(5*8)(r28)
lfd f10,-16-(4*8)(r28) lfd f10,-16-(4*8)(r28)
lfd f11,-16-(3*8)(r28) lfd f11,-16-(3*8)(r28)
lfd f12,-16-(2*8)(r28) lfd f12,-16-(2*8)(r28)
nop nop
lfd f13,-16-(1*8)(r28) lfd f13,-16-(1*8)(r28)
L2: L2:
/* Make the call. */ /* Make the call. */
bctrl bctrl
lwz r2,20(r1) lwz r2,20(r1)
/* Now, deal with the return value. */ /* Now, deal with the return value. */
mtcrf 0x01,r31 mtcrf 0x01,r31
......
/* ----------------------------------------------------------------------- /* -----------------------------------------------------------------------
aix_closure.S - Copyright (c) 2002 2003 Free Software Foundation, Inc. aix_closure.S - Copyright (c) 2002 2003 Free Software Foundation, Inc.
based on darwin_closure.S based on darwin_closure.S
PowerPC Assembly glue. PowerPC Assembly glue.
Permission is hereby granted, free of charge, to any person obtaining Permission is hereby granted, free of charge, to any person obtaining
...@@ -102,19 +102,19 @@ ffi_closure_ASM: ...@@ -102,19 +102,19 @@ ffi_closure_ASM:
mflr r0 /* extract return address */ mflr r0 /* extract return address */
stw r0, 8(r1) /* save the return address */ stw r0, 8(r1) /* save the return address */
/* 24 Bytes (Linkage Area) */ /* 24 Bytes (Linkage Area) */
/* 32 Bytes (params) */ /* 32 Bytes (params) */
/* 104 Bytes (13*8 from FPR) */ /* 104 Bytes (13*8 from FPR) */
/* 8 Bytes (result) */ /* 8 Bytes (result) */
/* 168 Bytes */ /* 168 Bytes */
stwu r1,-176(r1) /* skip over caller save area stwu r1,-176(r1) /* skip over caller save area
keep stack aligned to 16 */ keep stack aligned to 16 */
/* we want to build up an area for the parameters passed */ /* we want to build up an area for the parameters passed */
/* in registers (both floating point and integer) */ /* in registers (both floating point and integer) */
/* we store gpr 3 to gpr 10 (aligned to 4) /* we store gpr 3 to gpr 10 (aligned to 4)
in the parents outgoing area */ in the parents outgoing area */
stw r3, 200(r1) stw r3, 200(r1)
...@@ -199,18 +199,18 @@ L..46: ...@@ -199,18 +199,18 @@ L..46:
L..47: L..47:
lfs f1,0(r5) lfs f1,0(r5)
b L..44 b L..44
/* case long long */ /* case long long */
L..48: L..48:
lwz r3,0(r5) lwz r3,0(r5)
lwz r4,4(r5) lwz r4,4(r5)
b L..44 b L..44
/* case default / int32 / pointer */ /* case default / int32 / pointer */
L..50: L..50:
lwz r3,0(r5) lwz r3,0(r5)
b L..44 b L..44
/* case signed int8 */ /* case signed int8 */
L..55: L..55:
addi r5,r5,3 addi r5,r5,3
...@@ -239,10 +239,9 @@ L..58: ...@@ -239,10 +239,9 @@ L..58:
/* case void / done */ /* case void / done */
L..44: L..44:
addi r1,r1,176 /* restore stack pointer */ addi r1,r1,176 /* restore stack pointer */
lwz r0,8(r1) /* get return address */ lwz r0,8(r1) /* get return address */
mtlr r0 /* reset link register */ mtlr r0 /* reset link register */
blr blr
/* END(ffi_closure_ASM) */ /* END(ffi_closure_ASM) */
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment