math: Regenerate s390 ulps
[glibc.git] / sysdeps / powerpc / powerpc64 / fpu / s_llrint.S
blobd3cc9b821e33a39d3de7250be0a70ed094ee557a
1 /* Round double to long int.  PowerPC64 version.
2    Copyright (C) 2004-2018 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
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.
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.
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/>.  */
19 #include <sysdep.h>
20 #include <math_ldbl_opt.h>
21 #include <libm-alias-float.h>
22 #include <libm-alias-double.h>
24 /* long long int[r3] __llrint (double x[fp1])  */
25 ENTRY_TOCLESS (__llrint)
26         CALL_MCOUNT 0
27         fctid   fp13,fp1
28         stfd    fp13,-16(r1)
29         nop     /* Insure the following load is in a different dispatch group */
30         nop     /* to avoid pipe stall on POWER4&5.  */
31         nop
32         ld      r3,-16(r1)
33         blr
34         END (__llrint)
36 strong_alias (__llrint, __lrint)
37 libm_alias_double (__llrint, llrint)
38 libm_alias_double (__lrint, lrint)
39 /* The double version also works for single-precision as both float and
40    double parameters are passed in 64bit FPRs and both versions are expected
41    to return [long] long type.  */
42 strong_alias (__llrint, __llrintf)
43 libm_alias_float (__llrint, llrint)
44 strong_alias (__lrint, __lrintf)
45 libm_alias_float (__lrint, lrint)