]> git.ipfire.org Git - thirdparty/glibc.git/blobdiff - math/test-tgmath-ret.c
Prefer https to http for gnu.org and fsf.org URLs
[thirdparty/glibc.git] / math / test-tgmath-ret.c
index 9f535b977492110a639e85ba733ec2ec0e2cba88..4565870d404d39ee3765d50cb3b3db0793e3eb97 100644 (file)
@@ -1,5 +1,5 @@
 /* Test compilation of tgmath macros.
-   Copyright (C) 2003-2016 Free Software Foundation, Inc.
+   Copyright (C) 2003-2019 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    Contributed by Andreas Jaeger <aj@suse.de>, 2003.
 
 
    You should have received a copy of the GNU Lesser General Public
    License along with the GNU C Library; if not, see
-   <http://www.gnu.org/licenses/>.  */
+   <https://www.gnu.org/licenses/>.  */
 
 #include <math.h>
 #include <complex.h>
 #include <tgmath.h>
+#include <stdint.h>
 #include <stdio.h>
 
 static float fx;
 static double dx;
 static long double lx;
+static int rm = FP_INT_UPWARD;
+static unsigned int width = 64;
 static int errors = 0;
 
 static void
@@ -36,46 +39,52 @@ our_error (const char *c)
 
 /* First function where the return type is constant.  */
 
-#define CHECK_RET_CONST_TYPE(func, rettype, arg, name) \
-  if (sizeof (func (arg)) != sizeof (rettype))                               \
+#define CHECK_RET_CONST_TYPE(func, rettype, arg, name, ...)            \
+  if (sizeof (func (arg, ## __VA_ARGS__)) != sizeof (rettype))         \
     our_error ("Return size of " #func " is wrong with " #name " argument");
 
-#define CHECK_RET_CONST_FLOAT(func, rettype) \
-  CHECK_RET_CONST_TYPE (func, rettype, fx, float)
-#define CHECK_RET_CONST_DOUBLE(func, rettype) \
-  CHECK_RET_CONST_TYPE (func, rettype, dx, double)
-#ifdef NO_LONG_DOUBLE
-# define CHECK_RET_CONST_LDOUBLE(func, rettype)
-#else
-# define CHECK_RET_CONST_LDOUBLE(func, rettype) \
-  CHECK_RET_CONST_TYPE (func, rettype, lx, long double)
-#endif
+#define CHECK_RET_CONST_FLOAT(func, rettype, ...)                      \
+  CHECK_RET_CONST_TYPE (func, rettype, fx, float, ## __VA_ARGS__)
+#define CHECK_RET_CONST_DOUBLE(func, rettype, ...)                     \
+  CHECK_RET_CONST_TYPE (func, rettype, dx, double, ## __VA_ARGS__)
+#define CHECK_RET_CONST_LDOUBLE(func, rettype, ...)                    \
+  CHECK_RET_CONST_TYPE (func, rettype, lx, long double, ## __VA_ARGS__)
 
-#define CHECK_RET_CONST(func, rettype) \
-static void                                                                  \
-check_return_ ##func (void)                                                  \
-{                                                                            \
-  CHECK_RET_CONST_FLOAT (func, rettype)                                              \
-  CHECK_RET_CONST_DOUBLE (func, rettype)                                     \
-  CHECK_RET_CONST_LDOUBLE (func, rettype)                                    \
+#define CHECK_RET_CONST(func, rettype, ...)                    \
+static void                                                    \
+check_return_ ##func (void)                                    \
+{                                                              \
+  CHECK_RET_CONST_FLOAT (func, rettype, ## __VA_ARGS__)                \
+  CHECK_RET_CONST_DOUBLE (func, rettype, ## __VA_ARGS__)       \
+  CHECK_RET_CONST_LDOUBLE (func, rettype, ## __VA_ARGS__)      \
 }
 
 CHECK_RET_CONST(ilogb, int)
+CHECK_RET_CONST(llogb, long)
 CHECK_RET_CONST(lrint, long)
 CHECK_RET_CONST(lround, long)
 CHECK_RET_CONST(llrint, long long)
 CHECK_RET_CONST(llround, long long)
+CHECK_RET_CONST(fromfp, intmax_t, rm, width)
+CHECK_RET_CONST(ufromfp, uintmax_t, rm, width)
+CHECK_RET_CONST(fromfpx, intmax_t, rm, width)
+CHECK_RET_CONST(ufromfpx, uintmax_t, rm, width)
 
 static int
 do_test (void)
 {
   check_return_ilogb ();
+  check_return_llogb ();
   check_return_lrint ();
   check_return_lround ();
   check_return_llrint ();
   check_return_llround ();
+  check_return_fromfp ();
+  check_return_ufromfp ();
+  check_return_fromfpx ();
+  check_return_ufromfpx ();
 
-  printf ("%Zd\n", sizeof(carg (lx)));
+  printf ("%Zd\n", sizeof (carg (lx)));
 
   return errors != 0;
 }