1
0
mirror of https://git.savannah.gnu.org/git/gnulib.git synced 2026-10-24 00:48:56 +03:00
Files
gnulib/tests/test-rintl.c
Bruno Haible f1d55e9f84 Use countof, part 2.
Done through  sed -e 's/SIZEOF \([(][^()]*[)]\)/countof \1/g'

* lib/boot-time.c: Include <stdcountof.h>.
* lib/readutmp.c: Include <stdcountof.h>.
* lib/boot-time-aux.h (get_linux_boot_time_fallback,
get_openbsd_boot_time, get_windows_boot_time): Use countof.
* lib/duplocale.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
(duplocale): Use countof instead.
* lib/fatal-signal.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
(num_fatal_signals, actions_allocated): Use countof instead.
* lib/iconv_open.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
(rpl_iconv_open): Use countof instead.
* lib/term-style-control.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
(num_job_control_signals): Use countof instead.
* lib/uniconv/u16-conv-to-enc.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
* lib/uniconv/u32-conv-to-enc.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
* lib/uniconv/u-conv-to-enc.h (FUNC): Use countof instead.
* lib/uniconv/u16-strconv-to-enc.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
* lib/uniconv/u32-strconv-to-enc.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
* lib/uniconv/u-strconv-to-enc.h (FUNC): Use countof instead.
* lib/uniname/uniname.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
(unicode_name_word, unicode_name_word_lookup, unicode_code_to_index,
unicode_index_to_code, unicode_character_name, unicode_name_character):
Use countof instead.
* lib/uniwidth/width.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
(uc_width): Use countof instead.
* lib/wait-process.c: Include <stdcountof.h>.
(SIZEOF): Remove macro.
(slaves_allocated): Use countof instead.
* lib/gen-uni-tables.c (countof): Renamed from SIZEOF.
* modules/boot-time (Depends-on): Add stdcountof-h.
* modules/readutmp (Depends-on): Likewise.
* modules/duplocale (Depends-on): Likewise.
* modules/fatal-signal (Depends-on): Likewise.
* modules/iconv_open (Depends-on): Likewise.
* modules/term-style-control (Depends-on): Likewise.
* modules/uniconv/u16-conv-to-enc (Depends-on): Likewise.
* modules/uniconv/u32-conv-to-enc (Depends-on): Likewise.
* modules/uniconv/u16-strconv-to-enc (Depends-on): Likewise.
* modules/uniconv/u32-strconv-to-enc (Depends-on): Likewise.
* modules/uniname/uniname (Depends-on): Likewise.
* modules/uniwidth/width (Depends-on): Likewise.
* modules/wait-process (Depends-on): Likewise.
* tests/macros.h (SIZEOF): Remove macro.
* tests/**/*.[hc]: Use countof instead of SIZEOF. Include <stdcountof.h>
as needed.
* modules/**/*-tests (Depends-on): Add stdcountof-h if needed.
2026-03-02 14:35:26 +01:00

107 lines
3.1 KiB
C

/* Test of rintl() function.
Copyright (C) 2010-2026 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 3 of the License, 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, see <https://www.gnu.org/licenses/>. */
/* Written by Bruno Haible <bruno@clisp.org>, 2010. */
#include <config.h>
#include <math.h>
#include "signature.h"
SIGNATURE_CHECK (rintl, long double, (long double));
#include <float.h>
#include <stdcountof.h>
#include <stdio.h>
#include "fpucw.h"
#include "isnanl-nolibm.h"
#include "minus-zero.h"
#include "infinity.h"
#include "nan.h"
#include "macros.h"
#undef INFINITY
#undef NAN
#define DOUBLE long double
#define ISNAN isnanl
#define INFINITY Infinityl ()
#define NAN NaNl ()
#define L_(literal) literal##L
#define RINT rintl
#define RANDOM randoml
#include "test-rint.h"
int
main ()
{
DECL_LONG_DOUBLE_ROUNDING
BEGIN_LONG_DOUBLE_ROUNDING ();
/* Consider the current rounding mode, cf.
<https://pubs.opengroup.org/onlinepubs/9699919799/basedefs/float.h.html> */
if (FLT_ROUNDS == 1)
{
/* The current rounding mode is round-to-nearest
(the default in IEEE 754). */
/* Zero. */
ASSERT (rintl (0.0L) == 0.0L);
ASSERT (rintl (minus_zerol) == 0.0L);
/* Positive numbers. */
ASSERT (rintl (0.3L) == 0.0L);
ASSERT (rintl (0.5L) == 0.0L); /* unlike roundl() */
ASSERT (rintl (0.7L) == 1.0L);
ASSERT (rintl (1.0L) == 1.0L);
ASSERT (rintl (1.5L) == 2.0L);
ASSERT (rintl (1.999L) == 2.0L);
ASSERT (rintl (2.0L) == 2.0L);
ASSERT (rintl (2.1L) == 2.0L);
ASSERT (rintl (2.5L) == 2.0L); /* unlike roundl() */
ASSERT (rintl (2.7L) == 3.0L);
ASSERT (rintl (65535.999L) == 65536.0L);
ASSERT (rintl (65536.0L) == 65536.0L);
ASSERT (rintl (65536.001L) == 65536.0L);
ASSERT (rintl (2.341e31L) == 2.341e31L);
/* Negative numbers. */
ASSERT (rintl (-0.3L) == 0.0L);
ASSERT (rintl (-0.5L) == 0.0L); /* unlike roundl() */
ASSERT (rintl (-0.7L) == -1.0L);
ASSERT (rintl (-1.0L) == -1.0L);
ASSERT (rintl (-1.5L) == -2.0L);
ASSERT (rintl (-1.999L) == -2.0L);
ASSERT (rintl (-2.0L) == -2.0L);
ASSERT (rintl (-2.1L) == -2.0L);
ASSERT (rintl (-2.5L) == -2.0L); /* unlike roundl() */
ASSERT (rintl (-2.7L) == -3.0L);
ASSERT (rintl (-65535.999L) == -65536.0L);
ASSERT (rintl (-65536.0L) == -65536.0L);
ASSERT (rintl (-65536.001L) == -65536.0L);
ASSERT (rintl (-2.341e31L) == -2.341e31L);
test_function ();
return test_exit_status;
}
else
{
fputs ("Skipping test: non-standard rounding mode\n", stderr);
return 77;
}
}