openat: don’t close (-1)
[gnulib.git] / tests / test-fmal2.c
blob8a74779edd7cf4dcfdc50f27fb31cd3141c817cf
1 /* Test of fmal().
2 Copyright (C) 2011-2024 Free Software Foundation, Inc.
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 3 of the License, or
7 (at your option) any later version.
9 This program 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
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <https://www.gnu.org/licenses/>. */
17 /* Written by Bruno Haible <bruno@clisp.org>, 2011. */
19 #include <config.h>
21 #include <math.h>
23 #include "fpucw.h"
24 #include "float+.h"
25 #include "infinity.h"
26 #include "macros.h"
28 #undef INFINITY
30 #define DOUBLE long double
31 #define LDEXP ldexpl
32 const int MIN_EXP = LDBL_MIN_EXP; /* for gdb */
33 #define MIN_EXP LDBL_MIN_EXP
34 const int MAX_EXP = LDBL_MAX_EXP; /* for gdb */
35 #define MAX_EXP LDBL_MAX_EXP
36 const int MANT_BIT = LDBL_MANT_BIT; /* for gdb */
37 #define MANT_BIT LDBL_MANT_BIT
38 #define INFINITY Infinityl ()
39 #define L_(literal) literal##L
40 #include "test-fma2.h"
42 int
43 main ()
45 DECL_LONG_DOUBLE_ROUNDING
47 BEGIN_LONG_DOUBLE_ROUNDING ();
49 test_function (fmal);
51 return test_exit_status;