/* Split a double into fraction and mantissa.
- Copyright (C) 2007 Free Software Foundation, Inc.
+ Copyright (C) 2007-2008 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
# include "isnanl-nolibm.h"
# include "fpucw.h"
#else
-# include "isnan.h"
+# include "isnand-nolibm.h"
#endif
/* This file assumes FLT_RADIX = 2. If FLT_RADIX is a power of 2 greater
#else
# define FUNC frexp
# define DOUBLE double
-# define ISNAN isnan
+# define ISNAN isnand
# define DECL_ROUNDING
# define BEGIN_ROUNDING()
# define END_ROUNDING()
#endif
DOUBLE
-FUNC (DOUBLE x, int *exp)
+FUNC (DOUBLE x, int *expptr)
{
int sign;
int exponent;
/* Test for NaN, infinity, and zero. */
if (ISNAN (x) || x + x == x)
{
- *exp = 0;
+ *expptr = 0;
return x;
}
END_ROUNDING ();
- *exp = exponent;
+ *expptr = exponent;
return x;
}