From 304d7abfadb59d53c078c43bf825d13d279992c0 Mon Sep 17 00:00:00 2001 From: Ulrich Drepper Date: Thu, 17 May 2001 07:11:00 +0000 Subject: Update. 2001-05-14 Bruno Haible * iconvdata/iso-2022-cn-ext.c (BODY for FROM_LOOP): If SO is seen without previous announcement, reject it regularly, don't abort. 2001-05-16 Ulrich Drepper * math/tgmath.h: Fix handling of int parameters to binary and ternary functions. Reported by mitr@volny.cz. * math/test-tgmath.c: Add tests for calls with integer parameters. * manual/llio.texi: Many grammar and typo fixes to the section on AIO. --- math/test-tgmath.c | 16 +++++++++++++--- math/tgmath.h | 20 +++++++++++--------- 2 files changed, 24 insertions(+), 12 deletions(-) (limited to 'math') diff --git a/math/test-tgmath.c b/math/test-tgmath.c index ad63f71..b6004e5 100644 --- a/math/test-tgmath.c +++ b/math/test-tgmath.c @@ -40,7 +40,8 @@ int count_double; int count_float; int count_ldouble; -#define NCALLS 115 +#define NCALLS 115 +#define NCALLS_INT 4 int main (void) @@ -59,13 +60,13 @@ main (void) puts ("long double function called for double test"); result = 1; } - if (count_double < NCALLS) + if (count_double < NCALLS + NCALLS_INT) { printf ("double functions not called often enough (%d)\n", count_double); result = 1; } - else if (count_double > NCALLS) + else if (count_double > NCALLS + NCALLS_INT) { printf ("double functions called too often (%d)\n", count_double); @@ -131,6 +132,7 @@ main (void) #define F(name) name #define TYPE double +#define TEST_INT 1 #define x dx #define count count_double #include "test-tgmath.c" @@ -217,6 +219,13 @@ F(compile_test) (void) b = fmax (fmax (a, x), fmax (c, b)); a = fmin (fmin (x, a), fmin (c, b)); b = fma (sin (a), sin (x), sin (c)); + +#ifdef TEST_INT + a = atan2 (i, b); + b = remquo (i, a, &i); + c = fma (i, b, i); + a = pow (i, c); +#endif } #undef x @@ -663,4 +672,5 @@ TYPE #undef F #undef TYPE #undef count +#undef TEST_INT #endif diff --git a/math/tgmath.h b/math/tgmath.h index 0c02aaa..1c08565 100644 --- a/math/tgmath.h +++ b/math/tgmath.h @@ -93,8 +93,8 @@ __tgmres = __tgml(Fct) (Val1, Val2); \ else if (sizeof (Val1) == sizeof (double) \ || sizeof (Val2) == sizeof (double) \ - || __builtin_classify_type ((Val1) \ - + (Val2)) != 8) \ + || __builtin_classify_type (Val1) != 8 \ + || __builtin_classify_type (Val2) != 8) \ __tgmres = Fct (Val1, Val2); \ else \ __tgmres = Fct##f (Val1, Val2); \ @@ -108,8 +108,8 @@ __tgmres = __tgml(Fct) (Val1, Val2, Val3); \ else if (sizeof (Val1) == sizeof (double) \ || sizeof (Val2) == sizeof (double) \ - || __builtin_classify_type ((Val1) \ - + (Val2)) != 8) \ + || __builtin_classify_type (Val1) != 8 \ + || __builtin_classify_type (Val2) != 8) \ __tgmres = Fct (Val1, Val2, Val3); \ else \ __tgmres = Fct##f (Val1, Val2, Val3); \ @@ -126,8 +126,9 @@ else if (sizeof (Val1) == sizeof (double) \ || sizeof (Val2) == sizeof (double) \ || sizeof (Val3) == sizeof (double) \ - || __builtin_classify_type ((Val1) + (Val2) \ - + (Val3)) != 8) \ + || __builtin_classify_type (Val1) != 8 \ + || __builtin_classify_type (Val2) != 8 \ + || __builtin_classify_type (Val3) != 8) \ __tgmres = Fct (Val1, Val2, Val3); \ else \ __tgmres = Fct##f (Val1, Val2, Val3); \ @@ -194,9 +195,10 @@ } \ else if (sizeof (__real__ (Val1)) == sizeof (double) \ || sizeof (__real__ (Val2)) == sizeof(double) \ - || __builtin_classify_type (__real__ (Val1) \ - + __real__ (Val2))\ - != 8) \ + || (__builtin_classify_type (__real__ (Val1)) \ + != 8) \ + || (__builtin_classify_type (__real__ (Val2)) \ + != 8)) \ { \ if (sizeof (__real__ (Val1)) == sizeof (Val1) \ && sizeof (__real__ (Val2)) == sizeof (Val2)) \ -- cgit v1.1