1  /* Round to nearest integer.  PowerPC32 version.
       2     Copyright (C) 2019-2023 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
      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