From 2293395f48cbfbd6ddf548fea8ba832e4c185356 Mon Sep 17 00:00:00 2001 From: Ulrich Drepper Date: Sun, 10 Oct 1999 00:00:36 +0000 Subject: Update. * nss/getXXbyYY_r.c (do_weak_alias): Remove unnecessary parenthesis. * sysdeps/powerpc/s_copysign.S: Move to... * sysdeps/powerpc/fpu/s_copysign.S: ...here. Use portable asm syntax. * sysdeps/powerpc/s_copysignf.S: Move to... * sysdeps/powerpc/fpu/s_copysignf.S: ...here. * sysdeps/powerpc/s_fabs.S: Move to... * sysdeps/powerpc/fpu/s_fabs.S: ...here. Use portable asm syntax. * sysdeps/powerpc/s_fabsf.S: Move to... * sysdeps/powerpc/fpu/s_fabsf.S: ...here. * sysdeps/powerpc/s_fdim.c: Move to... * sysdeps/powerpc/fpu/s_fdim.c: ...here. * sysdeps/powerpc/s_fdimf.c: Move to... * sysdeps/powerpc/fpu/s_fdimf.c: ...here. * sysdeps/powerpc/s_fmax.S: Move to... * sysdeps/powerpc/fpu/s_fmax.S: ...here. Use portable asm syntax. * sysdeps/powerpc/s_fmaxf.S: Move to... * sysdeps/powerpc/fpu/s_fmaxf.S: ...here. * sysdeps/powerpc/s_fmin.S: Move to... * sysdeps/powerpc/fpu/s_fmin.S: ...here. Use portable asm syntax. * sysdeps/powerpc/s_fminf.S: Move to... * sysdeps/powerpc/fpu/s_fminf.S: ...here. * sysdeps/powerpc/s_isnan.S: Move to... * sysdeps/powerpc/fpu/s_isnan.c: ...here. * sysdeps/powerpc/s_isnanf.S: Move to... * sysdeps/powerpc/fpu/s_isnanf.S: ...here. * sysdeps/powerpc/s_llrint.c: Move to... * sysdeps/powerpc/fpu/s_llrint.c: ...here. * sysdeps/powerpc/s_llrintf.c: Move to... * sysdeps/powerpc/fpu/s_llrintf.c: ...here. * sysdeps/powerpc/s_llround.c: Move to... * sysdeps/powerpc/fpu/s_llround.c: ...here. * sysdeps/powerpc/s_llroundf.c: Move to... * sysdeps/powerpc/fpu/s_llroundf.c: ...here. * sysdeps/powerpc/s_lrint.c: Move to... * sysdeps/powerpc/fpu/s_lrint.c: ...here. * sysdeps/powerpc/s_lrintf.S: Move to... * sysdeps/powerpc/fpu/s_lrintf.S: ...here. * sysdeps/powerpc/s_lround.c: Move to... * sysdeps/powerpc/fpu/s_lround.c: ...here. * sysdeps/powerpc/s_lroundf.c: Move to... * sysdeps/powerpc/fpu/s_lroundf.c: ...here. * sysdeps/powerpc/s_rint.c: Move to... * sysdeps/powerpc/fpu/s_rint.c: ...here. * sysdeps/powerpc/s_rintf.c: Move to... * sysdeps/powerpc/fpu/s_rintf.c: ...here. * sysdeps/powerpc/t_sqrt.c: Move to... * sysdeps/powerpc/fpu/t_sqrt: ...here. * sysdeps/powerpc/w_sqrt.c: Move to... * sysdeps/powerpc/fpu/w_sqrt.c: ...here. * sysdeps/powerpc/w_sqrtf.c: Move to... * sysdeps/powerpc/fpu/w_sqrtf.c: ...here. * configure.in: Support platforms which have no .text pseudo-op. Patches partly by Jimi X . --- sysdeps/powerpc/fpu/s_lrint.c | 46 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 46 insertions(+) create mode 100644 sysdeps/powerpc/fpu/s_lrint.c (limited to 'sysdeps/powerpc/fpu/s_lrint.c') diff --git a/sysdeps/powerpc/fpu/s_lrint.c b/sysdeps/powerpc/fpu/s_lrint.c new file mode 100644 index 0000000000..a060598859 --- /dev/null +++ b/sysdeps/powerpc/fpu/s_lrint.c @@ -0,0 +1,46 @@ +/* Round floating-point to integer. PowerPC version. + Copyright (C) 1997 Free Software Foundation, Inc. + This file is part of the GNU C Library. + + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Library General Public License as + published by the Free Software Foundation; either version 2 of the + License, or (at your option) any later version. + + The GNU C Library is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + Library General Public License for more details. + + You should have received a copy of the GNU Library General Public + License along with the GNU C Library; see the file COPYING.LIB. If not, + write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, + Boston, MA 02111-1307, USA. */ + +#include "math.h" + +long int +__lrint (double x) +{ + union { + double d; + long int ll[2]; + } u; + asm ("fctiw %0,%1" : "=f"(u.d) : "f"(x)); + return u.ll[1]; +} +weak_alias (__lrint, lrint) + +/* This code will also work for a 'float' argument. */ +asm ("\ + .globl __lrintf + .globl lrintf + .weak lrintf + .set __lrintf,__lrint + .set lrintf,__lrint +"); + +#ifdef NO_LONG_DOUBLE +strong_alias (__lrint, __lrintl) +weak_alias (__lrint, lrintl) +#endif -- cgit v1.2.3