1 /* Round to nearest integer.  PowerPC32 version.
2    Copyright (C) 2019-2022 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 Library General Public License as
7    published by the Free Software Foundation; either version 2 of the
8    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    Library General Public License for more details.
14 
15    You should have received a copy of the GNU Library General Public
16    License along with the GNU C Library; see the file COPYING.LIB.  If
17    not, see <https://www.gnu.org/licenses/>.  */
18 
19 #define NO_MATH_REDIRECT
20 #define lrintf __redirect_lrintf
21 #define __lrintf __redirect___lrintf
22 #include <math.h>
23 #undef lrintf
24 #undef __lrintf
25 #include <fenv_private.h>
26 #include <libm-alias-double.h>
27 #include <libm-alias-float.h>
28 
29 long int
__lrint(double x)30 __lrint (double x)
31 {
32   long long int ret;
33   __asm__ ("fctiw %0, %1" : "=d" (ret) : "d" (x));
34   return ret;
35 }
36 #ifndef __lrint
37 libm_alias_double (__lrint, lrint)
38 strong_alias (__lrint, __lrintf)
39 libm_alias_float (__lrint, lrint)
40 #endif
41