diff options
| author | Rainer Orth <ro@TechFak.Uni-Bielefeld.DE> | 2001-07-16 17:12:14 +0000 |
|---|---|---|
| committer | Rainer Orth <ro@gcc.gnu.org> | 2001-07-16 17:12:14 +0000 |
| commit | 03a8de49b8883f3938ca1289affb23ad9af15dd9 (patch) | |
| tree | 2d7f223e497c4265edc61215d1d751dd6f048572 /libffi/src | |
| parent | 92a0e6c6c8eaff9d238717c8c64dec84a6517a16 (diff) | |
| download | gcc-03a8de49b8883f3938ca1289affb23ad9af15dd9.zip gcc-03a8de49b8883f3938ca1289affb23ad9af15dd9.tar.gz gcc-03a8de49b8883f3938ca1289affb23ad9af15dd9.tar.bz2 | |
sysv.S: Avoid gas-only .balign directive.
* src/x86/sysv.S: Avoid gas-only .balign directive.
Use C style comments.
From-SVN: r44046
Diffstat (limited to 'libffi/src')
| -rw-r--r-- | libffi/src/x86/sysv.S | 33 |
1 files changed, 16 insertions, 17 deletions
diff --git a/libffi/src/x86/sysv.S b/libffi/src/x86/sysv.S index d59a164..32eb633 100644 --- a/libffi/src/x86/sysv.S +++ b/libffi/src/x86/sysv.S @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------- - sysv.S - Copyright (c) 1996, 1998 Cygnus Solutions + sysv.S - Copyright (c) 1996, 1998, 2001 Cygnus Solutions X86 Foreign Function Interface @@ -30,8 +30,7 @@ .globl ffi_prep_args - # This assumes we are using gas. - .balign 16 + .align 4 .globl ffi_call_SYSV .type ffi_call_SYSV,@function @@ -41,35 +40,35 @@ ffi_call_SYSV: .LCFI0: movl %esp,%ebp .LCFI1: - # Make room for all of the new args. + /* Make room for all of the new args. */ movl 16(%ebp),%ecx subl %ecx,%esp movl %esp,%eax - # Place all of the ffi_prep_args in position + /* Place all of the ffi_prep_args in position */ pushl 12(%ebp) pushl %eax call *8(%ebp) - # Return stack to previous state and call the function + /* Return stack to previous state and call the function */ addl $8,%esp call *28(%ebp) - # Remove the space we pushed for the args + /* Remove the space we pushed for the args */ movl 16(%ebp),%ecx addl %ecx,%esp - # Load %ecx with the return type code + /* Load %ecx with the return type code */ movl 20(%ebp),%ecx - # If the return value pointer is NULL, assume no return value. + /* If the return value pointer is NULL, assume no return value. */ cmpl $0,24(%ebp) jne retint - # Even if there is no space for the return value, we are - # obliged to handle floating-point values. + /* Even if there is no space for the return value, we are + obliged to handle floating-point values. */ cmpl $FFI_TYPE_FLOAT,%ecx jne noretval fstp %st(0) @@ -79,7 +78,7 @@ ffi_call_SYSV: retint: cmpl $FFI_TYPE_INT,%ecx jne retfloat - # Load %ecx with the pointer to storage for the return value + /* Load %ecx with the pointer to storage for the return value */ movl 24(%ebp),%ecx movl %eax,0(%ecx) jmp epilogue @@ -87,7 +86,7 @@ retint: retfloat: cmpl $FFI_TYPE_FLOAT,%ecx jne retdouble - # Load %ecx with the pointer to storage for the return value + /* Load %ecx with the pointer to storage for the return value */ movl 24(%ebp),%ecx fstps (%ecx) jmp epilogue @@ -95,7 +94,7 @@ retfloat: retdouble: cmpl $FFI_TYPE_DOUBLE,%ecx jne retlongdouble - # Load %ecx with the pointer to storage for the return value + /* Load %ecx with the pointer to storage for the return value */ movl 24(%ebp),%ecx fstpl (%ecx) jmp epilogue @@ -103,7 +102,7 @@ retdouble: retlongdouble: cmpl $FFI_TYPE_LONGDOUBLE,%ecx jne retint64 - # Load %ecx with the pointer to storage for the return value + /* Load %ecx with the pointer to storage for the return value */ movl 24(%ebp),%ecx fstpt (%ecx) jmp epilogue @@ -111,13 +110,13 @@ retlongdouble: retint64: cmpl $FFI_TYPE_SINT64,%ecx jne retstruct - # Load %ecx with the pointer to storage for the return value + /* Load %ecx with the pointer to storage for the return value */ movl 24(%ebp),%ecx movl %eax,0(%ecx) movl %edx,4(%ecx) retstruct: - # Nothing to do! + /* Nothing to do! */ noretval: epilogue: |