2.9
[glibc/nacl-glibc.git] / sysdeps / alpha / fpu / s_lroundf.c
blob16ff348b21d2543df9b0e40ec58def7a1f3dfb68
1 /* Copyright (C) 2007 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
14 You should have received a copy of the GNU Lesser General Public
15 License along with the GNU C Library; if not, write to the Free
16 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17 02111-1307 USA. */
19 #define __llroundf not___llroundf
20 #define llroundf not_llroundf
21 #include <math.h>
22 #undef __llroundf
23 #undef llroundf
26 long int
27 __lroundf (float x)
29 float adj;
31 adj = 0x1.fffffep-2; /* nextafterf (0.5f, 0.0f) */
32 adj = copysignf (adj, x);
33 return x + adj;
36 strong_alias (__lroundf, __llroundf)
37 weak_alias (__lroundf, lroundf)
38 weak_alias (__llroundf, llroundf)