sysdeps/sparc/sparc32/fpu/w_sqrtf.S

   1 /* sqrtf function.  sparc32 version.
   2    Copyright (C) 2012-2015 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, see
  17    <http://www.gnu.org/licenses/>.  */
  18
  19 #include <sysdep.h>
  20
  21 ENTRY (__sqrtf)
  22         st      %g0, [%sp + 68]
  23         st      %o0, [%sp + 72]
  24         ld      [%sp + 68], %f8
  25         ld      [%sp + 72], %f0
  26         fcmps   %f0, %f8
  27         fbl     1f
  28          nop
  29 8:      retl
  30          fsqrts %f0, %f0
  31 1:
  32 #ifdef SHARED
  33         SETUP_PIC_REG_LEAF(o5, g1)
  34         sethi   %gdop_hix22(_LIB_VERSION), %g1
  35         xor     %g1, %gdop_lox10(_LIB_VERSION), %g1
  36         ld      [%o5 + %g1], %g1, %gdop(_LIB_VERSION)
  37 #else
  38         sethi   %hi(_LIB_VERSION), %g1
  39         or      %g1, %lo(_LIB_VERSION), %g1
  40 #endif
  41         ld      [%g1], %g1
  42         cmp     %g1, -1
  43         be      8b
  44          mov    %o0, %o1
  45         mov     126, %o2
  46         mov     %o7, %g1
  47         call    __kernel_standard_f
  48          mov    %g1, %o7
  49 END (__sqrtf)
  50
  51 weak_alias (__sqrtf, sqrtf)