sysdeps/powerpc/powerpc32/fpu/s_lrint.c

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