]> git.ipfire.org Git - thirdparty/glibc.git/blob - sysdeps/powerpc/powerpc64/fpu/s_llrint.S
d3cc9b821e33a39d3de7250be0a70ed094ee557a
[thirdparty/glibc.git] / sysdeps / powerpc / powerpc64 / fpu / s_llrint.S
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.
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 #include <math_ldbl_opt.h>
21 #include <libm-alias-float.h>
22 #include <libm-alias-double.h>
23
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)
35
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)