sysdeps/sparc/sparc32/fpu/w_sqrt.S

   1 /* sqrt function.  sparc32 version.
   2    Copyright (C) 2012-2014 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 (__sqrt)
  22         clr     %g1
  23         std     %g0, [%sp + 72]
  24         std     %o0, [%sp + 80]
  25         ldd     [%sp + 72], %f8
  26         ldd     [%sp + 80], %f0
  27         fcmpd   %f0, %f8
  28         fbl     1f
  29          nop
  30 8:      retl
  31          fsqrtd %f0, %f0
  32 1:
  33 #ifdef SHARED
  34         SETUP_PIC_REG_LEAF(o5, g1)
  35         sethi   %gdop_hix22(_LIB_VERSION), %g1
  36         xor     %g1, %gdop_lox10(_LIB_VERSION), %g1
  37         ld      [%o5 + %g1], %g1, %gdop(_LIB_VERSION)
  38 #else
  39         sethi   %hi(_LIB_VERSION), %g1
  40         or      %g1, %lo(_LIB_VERSION), %g1
  41 #endif
  42         ld      [%g1], %g1
  43         cmp     %g1, -1
  44         be      8b
  45          mov    %o0, %o2
  46         mov     %o1, %o3
  47         mov     26, %o4
  48         mov     %o7, %g1
  49         call    __kernel_standard
  50          mov    %g1, %o7
  51 END (__sqrt)
  52
  53 weak_alias (__sqrt, sqrt)