sysv.S: Avoid gas-only .balign directive.
authorRainer Orth <ro@TechFak.Uni-Bielefeld.DE>
Mon, 16 Jul 2001 17:12:14 +0000 (17:12 +0000)
committerRainer Orth <ro@gcc.gnu.org>
Mon, 16 Jul 2001 17:12:14 +0000 (17:12 +0000)
* src/x86/sysv.S: Avoid gas-only .balign directive.
Use C style comments.

From-SVN: r44046

libffi/ChangeLog
libffi/src/x86/sysv.S

index 17dfbc2abf113d47679735a35df16cb762d03d79..512b822455d1bd0d96364f51aa319a4aa1279ef6 100644 (file)
@@ -1,3 +1,8 @@
+2001-07-16  Rainer Orth  <ro@TechFak.Uni-Bielefeld.DE>
+
+       * src/x86/sysv.S: Avoid gas-only .balign directive.
+       Use C style comments.
+
 2001-07-16  Rainer Orth  <ro@TechFak.Uni-Bielefeld.DE>
 
        * src/alpha/ffi.c (ffi_prep_closure): Avoid gas-only mnemonic.
index d59a16433bf22ba1ec6d16ac53e8b378d998e31f..32eb633b44384b8d7bdbfc15bce24cf5f15b09f8 100644 (file)
@@ -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: