-# frexpl.m4 serial 12
-dnl Copyright (C) 2007-2010 Free Software Foundation, Inc.
+# frexpl.m4 serial 13
+dnl Copyright (C) 2007-2011 Free Software Foundation, Inc.
dnl This file is free software; the Free Software Foundation
dnl gives unlimited permission to copy and/or distribute it,
dnl with or without modifications, as long as this notice is preserved.
extern long double frexpl (long double, int *);
int main()
{
+ int result = 0;
volatile long double x;
/* Test on finite numbers that fails on AIX 5.1. */
x = 16.0L;
int exp = -9999;
frexpl (x, &exp);
if (exp != 5)
- return 1;
+ result |= 1;
}
/* Test on finite numbers that fails on MacOS X 10.4, because its frexpl
function returns an invalid (incorrectly normalized) value: it returns
int exp = -9999;
long double y = frexpl (x, &exp);
if (!(exp == 1 && y == 0.505L))
- return 1;
+ result |= 2;
}
/* Test on large finite numbers. This fails on BeOS at i = 16322, while
LDBL_MAX_EXP = 16384.
int exp = -9999;
frexpl (x, &exp);
if (exp != i)
- return 1;
+ {
+ result |= 4;
+ break;
+ }
}
}
/* Test on denormalized numbers. */
/* On machines with IEEE854 arithmetic: x = 1.68105e-4932,
exp = -16382, y = 0.5. On MacOS X 10.5: exp = -16384, y = 0.5. */
if (exp != LDBL_MIN_EXP - 1)
- return 1;
+ result |= 8;
}
}
/* Test on infinite numbers. */
int exp;
long double y = frexpl (x, &exp);
if (y != x)
- return 1;
+ result |= 16;
}
- return 0;
+ return result;
}]])],
[gl_cv_func_frexpl_works=yes],
[gl_cv_func_frexpl_works=no],