2.9
[glibc/nacl-glibc.git] / sysdeps / alpha / alphaev6 / fpu / e_sqrtf.S
blob3500e832c19eca560e46ed3a41c6385762bdd5d9
1 /* Copyright (C) 2000 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
4    The GNU C Library is free software; you can redistribute it and/or
5    modify it under the terms of the GNU Lesser General Public
6    License as published by the Free Software Foundation; either
7    version 2.1 of the License, or (at your option) any later version.
9    The GNU C Library is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    Lesser General Public License for more details.
14    You should have received a copy of the GNU Lesser General Public
15    License along with the GNU C Library; if not, write to the Free
16    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17    02111-1307 USA.  */
19 #include <sysdep.h>
21         .arch ev6
22         .set noreorder
23         .set noat
25 ENTRY(__ieee754_sqrtf)
26 #ifdef PROF
27         ldgp    gp, 0(pv)
28         lda     AT, _mcount
29         jsr     AT, (AT), _mcount
30         .prologue 1
31 #else
32         .prologue 0
33 #endif
35         .align 4
36 #ifdef _IEEE_FP_INEXACT
37         sqrts/sui $f16, $f0
38 #else
39         sqrts/su $f16, $f0
40 #endif
41         ret
42         nop
43         nop
45 END(__ieee754_sqrtf)