kc3-lang/gnulib/lib/rintl.c

• Show log

  Commit

• Hash : 11368c16
  Author :
  Date : 2011-10-10T01:08:51
  

  rintl: Simplify for platforms where 'long double' == 'double'.
  
  * lib/rintl.c: Include <config.h>.
  (rintl) [HAVE_SAME_LONG_DOUBLE_AS_DOUBLE]: New function.
  * lib/rint.c [!USE_LONG_DOUBLE]: Don't include <config.h> a second
  time.
  * m4/rintl.m4 (gl_FUNC_RINTL): Require gl_LONG_DOUBLE_VS_DOUBLE.
  Determine RINTL_LIBM according to HAVE_SAME_LONG_DOUBLE_AS_DOUBLE.
  * modules/rintl (Depends-on): Add rint. Update conditions.
  

Download

• lib/rintl.c

• /* Round according to the current rounding mode.
     Copyright (C) 2011 Free Software Foundation, Inc.
  
     This program is free software; you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
     the Free Software Foundation; either version 2, or (at your option)
     any later version.
  
     This program 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 General Public License for more details.
  
     You should have received a copy of the GNU General Public License along
     with this program; if not, write to the Free Software Foundation,
     Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
  
  #include <config.h>
  
  #if HAVE_SAME_LONG_DOUBLE_AS_DOUBLE
  
  /* Specification.  */
  # include <math.h>
  
  long double
  rintl (long double x)
  {
    return rint (x);
  }
  
  #else
  
  # define USE_LONG_DOUBLE
  # include "rint.c"
  
  #endif
  

Download