]> git.ipfire.org Git - thirdparty/glibc.git/blobdiff - sysdeps/powerpc/powerpc32/fpu/s_round.S
Remove trailing whitespace.
[thirdparty/glibc.git] / sysdeps / powerpc / powerpc32 / fpu / s_round.S
index 39eab232f60da505491fd8f2f9dba6a44802c039..73a100422b270e12decb09c60840846a2a972a45 100644 (file)
@@ -1,5 +1,5 @@
 /* round function.  PowerPC32 version.
-   Copyright (C) 2004 Free Software Foundation, Inc.
+   Copyright (C) 2004-2013 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
 
    The GNU C Library is free software; you can redistribute it and/or
    Lesser General Public License for more details.
 
    You should have received a copy of the GNU Lesser General Public
-   License along with the GNU C Library; if not, write to the Free
-   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
-   02111-1307 USA.  */
+   License along with the GNU C Library; if not, see
+   <http://www.gnu.org/licenses/>.  */
 
 #include <sysdep.h>
-
-       .section        .rodata
-       .align 3
-       .type   TWO52.0,@object
-       .size   TWO52.0,8
-TWO52.0:
-       .long 0x43300000
-       .long 0
-       .type   POINTFIVE.0,@object
-       .size   POINTFIVE.0,8
-POINTFIVE.0:
-       .long 0x3fe00000
-       .long 0
+#include <math_ldbl_opt.h>
 
        .section        .rodata.cst8,"aM",@progbits,8
-       .align 3
+       .align  2
 .LC0:  /* 2**52 */
-       .long 0x43300000
-       .long 0
+       .long 0x59800000
 .LC1:  /* 0.5 */
-       .long 0x3fe00000
-       .long 0
+       .long 0x3f000000
 
 /* double [fp1] round (double x [fp1])
-   IEEE 1003.1 round function.  IEEE specifies "round to the nearest 
+   IEEE 1003.1 round function.  IEEE specifies "round to the nearest
    integer value, rounding halfway cases away from zero, regardless of
    the current rounding mode."  However PowerPC Architecture defines
-   "Round to Nearest" as "Choose the best approximation. In case of a 
-   tie, choose the one that is even (least significant bit o).". 
+   "Round to Nearest" as "Choose the best approximation. In case of a
+   tie, choose the one that is even (least significant bit o).".
    So we can't use the PowerPC "Round to Nearest" mode. Instead we set
    "Round toward Zero" mode and round by adding +-0.5 before rounding
    to the integer value.  */
 
+       .section        ".text"
 ENTRY (__round)
        mffs    fp11            /* Save current FPU rounding mode.  */
 #ifdef SHARED
        mflr    r11
-       bl      _GLOBAL_OFFSET_TABLE_@local-4
-       mflr    r10
-       lwz     r9,.LC0@got(10)
+       cfi_register(lr,r11)
+       SETUP_GOT_ACCESS(r9,got_label)
+       addis   r9,r9,.LC0-got_label@ha
+       addi    r9,r9,.LC0-got_label@l
        mtlr    r11
-       lfd     fp13,0(r9)
+       cfi_same_value (lr)
+       lfs     fp13,0(r9)
 #else
        lis     r9,.LC0@ha
-       lfd     fp13,.LC0@l(r9)
+       lfs     fp13,.LC0@l(r9)
 #endif
        fabs    fp0,fp1
        fsub    fp12,fp13,fp13  /* generate 0.0  */
@@ -71,11 +59,10 @@ ENTRY (__round)
        bnllr-  cr7
        mtfsfi  7,1             /* Set rounding mode toward 0.  */
 #ifdef SHARED
-       lwz     r9,.LC1@got(10)
-       lfd     fp10,0(r9)
+       lfs     fp10,.LC1-.LC0(r9)
 #else
        lis     r9,.LC1@ha
-       lfd     fp10,.LC1@l(r9)
+       lfs     fp10,.LC1@l(r9)
 #endif
        ble-    cr6,.L4
        fadd    fp1,fp1,fp10    /* x+= 0.5;  */
@@ -103,3 +90,6 @@ weak_alias (__round, round)
 weak_alias (__round, roundl)
 strong_alias (__round, __roundl)
 #endif
+#if LONG_DOUBLE_COMPAT(libm, GLIBC_2_1)
+compat_symbol (libm, __round, roundl, GLIBC_2_1)
+#endif