aboutsummaryrefslogtreecommitdiff
path: root/sysdeps/ieee754
diff options
context:
space:
mode:
authorUlrich Drepper <drepper@redhat.com>1999-07-14 15:02:03 +0000
committerUlrich Drepper <drepper@redhat.com>1999-07-14 15:02:03 +0000
commitc68cb81185c18b59d974620c3679f90ee4f6c487 (patch)
treeafae7734a0f0158a9204be5e9599083de167a0c8 /sysdeps/ieee754
parentd4ff4aeb87f01f1fa146b942d223680af80b1346 (diff)
downloadglibc-c68cb81185c18b59d974620c3679f90ee4f6c487.zip
glibc-c68cb81185c18b59d974620c3679f90ee4f6c487.tar.gz
glibc-c68cb81185c18b59d974620c3679f90ee4f6c487.tar.bz2
More corrections.
* sysdeps/i960/Implies: Imply ieee754/flt-32 and ieee754/dbl-64 instead of ieee754. * sysdeps/generic/s_nextafter.c: ...here. * sysdeps/generic/s_nexttowardl.c: ...here.
Diffstat (limited to 'sysdeps/ieee754')
-rw-r--r--sysdeps/ieee754/ldbl-96/printf_fphex.c128
1 files changed, 74 insertions, 54 deletions
diff --git a/sysdeps/ieee754/ldbl-96/printf_fphex.c b/sysdeps/ieee754/ldbl-96/printf_fphex.c
index 8dfa387..844addd 100644
--- a/sysdeps/ieee754/ldbl-96/printf_fphex.c
+++ b/sysdeps/ieee754/ldbl-96/printf_fphex.c
@@ -1,61 +1,81 @@
+/* Print floating point number in hexadecimal notation according to
+ ISO C 9X.
+ Copyright (C) 1997, 1998, 1999 Free Software Foundation, Inc.
+ This file is part of the GNU C Library.
+
+ The GNU C Library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Library General Public License as
+ published by the Free Software Foundation; either version 2 of the
+ License, or (at your option) any later version.
+
+ The GNU C Library is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ Library General Public License for more details.
+
+ You should have received a copy of the GNU Library General Public
+ License along with the GNU C Library; see the file COPYING.LIB. If not,
+ write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ Boston, MA 02111-1307, USA. */
+
#ifndef LONG_DOUBLE_DENORM_BIAS
# define LONG_DOUBLE_DENORM_BIAS (IEEE854_LONG_DOUBLE_BIAS - 1)
#endif
-#define PRINT_FPHEX_LONG_DOUBLE \
-do { \
- /* The "strange" 80 bit format on ix86 and m68k has an explicit \
- leading digit in the 64 bit mantissa. */ \
- unsigned long long int num; \
- \
- assert (sizeof (long double) == 12); \
- \
- num = (((unsigned long long int) fpnum.ldbl.ieee.mantissa0) << 32 \
- | fpnum.ldbl.ieee.mantissa1); \
- \
- zero_mantissa = num == 0; \
- \
- if (sizeof (unsigned long int) > 6) \
- numstr = _itoa_word (num, numbuf + sizeof numbuf, 16, \
- info->spec == 'A'); \
- else \
- numstr = _itoa (num, numbuf + sizeof numbuf, 16, info->spec == 'A'); \
- \
- /* Fill with zeroes. */ \
- while (numstr > numbuf + (sizeof numbuf - 64 / 4)) \
- *--numstr = '0'; \
- \
- /* We use a full nibble for the leading digit. */ \
- leading = *numstr++; \
- \
- /* We have 3 bits from the mantissa in the leading nibble. \
- Therefore we are here using `IEEE854_LONG_DOUBLE_BIAS + 3'. */ \
- exponent = fpnum.ldbl.ieee.exponent; \
- \
- if (exponent == 0) \
- { \
- if (zero_mantissa) \
- expnegative = 0; \
- else \
- { \
- /* This is a denormalized number. */ \
- expnegative = 1; \
- /* This is a hook for the m68k long double format, where the \
- exponent bias is the same for normalized and denormalized \
- numbers. */ \
- exponent = LONG_DOUBLE_DENORM_BIAS + 3; \
- } \
- } \
- else if (exponent >= IEEE854_LONG_DOUBLE_BIAS + 3) \
- { \
- expnegative = 0; \
- exponent -= IEEE854_LONG_DOUBLE_BIAS + 3; \
- } \
- else \
- { \
- expnegative = 1; \
- exponent = -(exponent - (IEEE854_LONG_DOUBLE_BIAS + 3)); \
- } \
+#define PRINT_FPHEX_LONG_DOUBLE \
+do { \
+ /* The "strange" 80 bit format on ix86 and m68k has an explicit \
+ leading digit in the 64 bit mantissa. */ \
+ unsigned long long int num; \
+ \
+ assert (sizeof (long double) == 12); \
+ \
+ num = (((unsigned long long int) fpnum.ldbl.ieee.mantissa0) << 32 \
+ | fpnum.ldbl.ieee.mantissa1); \
+ \
+ zero_mantissa = num == 0; \
+ \
+ if (sizeof (unsigned long int) > 6) \
+ numstr = _itoa_word (num, numbuf + sizeof numbuf, 16, \
+ info->spec == 'A'); \
+ else \
+ numstr = _itoa (num, numbuf + sizeof numbuf, 16, info->spec == 'A'); \
+ \
+ /* Fill with zeroes. */ \
+ while (numstr > numbuf + (sizeof numbuf - 64 / 4)) \
+ *--numstr = '0'; \
+ \
+ /* We use a full nibble for the leading digit. */ \
+ leading = *numstr++; \
+ \
+ /* We have 3 bits from the mantissa in the leading nibble. \
+ Therefore we are here using `IEEE854_LONG_DOUBLE_BIAS + 3'. */ \
+ exponent = fpnum.ldbl.ieee.exponent; \
+ \
+ if (exponent == 0) \
+ { \
+ if (zero_mantissa) \
+ expnegative = 0; \
+ else \
+ { \
+ /* This is a denormalized number. */ \
+ expnegative = 1; \
+ /* This is a hook for the m68k long double format, where the \
+ exponent bias is the same for normalized and denormalized \
+ numbers. */ \
+ exponent = LONG_DOUBLE_DENORM_BIAS + 3; \
+ } \
+ } \
+ else if (exponent >= IEEE854_LONG_DOUBLE_BIAS + 3) \
+ { \
+ expnegative = 0; \
+ exponent -= IEEE854_LONG_DOUBLE_BIAS + 3; \
+ } \
+ else \
+ { \
+ expnegative = 1; \
+ exponent = -(exponent - (IEEE854_LONG_DOUBLE_BIAS + 3)); \
+ } \
} while (0)
#include <sysdeps/generic/printf_fphex.c>