1 /**************************************************************** 2 3 The author of this software is David M. Gay. 4 5 Copyright (C) 1998 by Lucent Technologies 6 All Rights Reserved 7 8 Permission to use, copy, modify, and distribute this software and 9 its documentation for any purpose and without fee is hereby 10 granted, provided that the above copyright notice appear in all 11 copies and that both that the copyright notice and this 12 permission notice and warranty disclaimer appear in supporting 13 documentation, and that the name of Lucent or any of its entities 14 not be used in advertising or publicity pertaining to 15 distribution of the software without specific, written prior 16 permission. 17 18 LUCENT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, 19 INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS. 20 IN NO EVENT SHALL LUCENT OR ANY OF ITS ENTITIES BE LIABLE FOR ANY 21 SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 22 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER 23 IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, 24 ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF 25 THIS SOFTWARE. 26 27 ****************************************************************/ 28 29 /* Please send bug reports to David M. Gay (dmg at acm dot org, 30 * with " at " changed at "@" and " dot " changed to "."). */ 31 32 #ifndef GDTOA_H_INCLUDED 33 #define GDTOA_H_INCLUDED 34 35 #include <stddef.h> /* for size_t */ 36 37 #define PROTO_NORMAL(x) 38 #define __BEGIN_HIDDEN_DECLS 39 #define __END_HIDDEN_DECLS 40 #define DEF_STRONG(x) 41 42 #ifndef ULong 43 #define ULong __ULong 44 #endif 45 46 #ifndef ANSI 47 #ifdef KR_headers 48 #define ANSI(x) () 49 #define Void /*nothing*/ 50 #else 51 #define ANSI(x) x 52 #define Void void 53 #endif 54 #endif /* ANSI */ 55 56 #ifndef CONST 57 #ifdef KR_headers 58 #define CONST /* blank */ 59 #else 60 #define CONST const 61 #endif 62 #endif /* CONST */ 63 64 enum { /* return values from strtodg */ 65 STRTOG_Zero = 0x000, 66 STRTOG_Normal = 0x001, 67 STRTOG_Denormal = 0x002, 68 STRTOG_Infinite = 0x003, 69 STRTOG_NaN = 0x004, 70 STRTOG_NaNbits = 0x005, 71 STRTOG_NoNumber = 0x006, 72 STRTOG_NoMemory = 0x007, 73 STRTOG_Retmask = 0x00f, 74 75 /* The following may be or-ed into one of the above values. */ 76 77 STRTOG_Inexlo = 0x010, /* returned result rounded toward zero */ 78 STRTOG_Inexhi = 0x020, /* returned result rounded away from zero */ 79 STRTOG_Inexact = 0x030, 80 STRTOG_Underflow= 0x040, 81 STRTOG_Overflow = 0x080, 82 STRTOG_Neg = 0x100 /* does not affect STRTOG_Inexlo or STRTOG_Inexhi */ 83 }; 84 85 typedef struct 86 FPI { 87 int nbits; 88 int emin; 89 int emax; 90 int rounding; 91 int sudden_underflow; 92 } FPI; 93 94 enum { /* FPI.rounding values: same as FLT_ROUNDS */ 95 FPI_Round_zero = 0, 96 FPI_Round_near = 1, 97 FPI_Round_up = 2, 98 FPI_Round_down = 3 99 }; 100 101 typedef unsigned short __UShort; 102 typedef struct _Bigint Bigint; 103 104 #ifdef __cplusplus 105 extern "C" { 106 #endif 107 108 extern char* __dtoa ( 109 double d, int mode, int ndigits, int *decpt, 110 int *sign, char **rve); 111 extern char* __gdtoa ( 112 FPI *fpi, int be, ULong *bits, int *kindp, 113 int mode, int ndigits, int *decpt, char **rve); 114 extern void __freedtoa (char*); 115 extern float strtof ANSI((CONST char *, char **)); 116 extern double strtod ANSI((CONST char *, char **)); 117 extern int __strtodg ANSI((CONST char*, char**, FPI*, Long*, ULong*)); 118 char *__hdtoa(double, const char *, int, int *, int *, char **); 119 char *__hldtoa(long double, const char *, int, int *, int *, char **); 120 char *__ldtoa(long double, int, int, int *, int *, char **); 121 122 PROTO_NORMAL(__dtoa); 123 PROTO_NORMAL(__gdtoa); 124 PROTO_NORMAL(__freedtoa); 125 PROTO_NORMAL(__hdtoa); 126 PROTO_NORMAL(__hldtoa); 127 PROTO_NORMAL(__ldtoa); 128 129 __BEGIN_HIDDEN_DECLS 130 extern char* __g_ddfmt ANSI((char*, double*, int, size_t)); 131 extern char* __g_dfmt ANSI((char*, double*, int, size_t)); 132 extern char* __g_ffmt ANSI((char*, float*, int, size_t)); 133 extern char* __g_Qfmt ANSI((char*, void*, int, size_t)); 134 extern char* __g_xfmt ANSI((char*, void*, int, size_t)); 135 extern char* __g_xLfmt ANSI((char*, void*, int, size_t)); 136 137 extern int __strtoId ANSI((CONST char*, char**, double*, double*)); 138 extern int __strtoIdd ANSI((CONST char*, char**, double*, double*)); 139 extern int __strtoIf ANSI((CONST char*, char**, float*, float*)); 140 extern int __strtoIQ ANSI((CONST char*, char**, void*, void*)); 141 extern int __strtoIx ANSI((CONST char*, char**, void*, void*)); 142 extern int __strtoIxL ANSI((CONST char*, char**, void*, void*)); 143 extern int __strtord ANSI((CONST char*, char**, int, double*)); 144 extern int __strtordd ANSI((CONST char*, char**, int, double*)); 145 extern int __strtorf ANSI((CONST char*, char**, int, float*)); 146 extern int __strtorQ ANSI((CONST char*, char**, int, void*)); 147 extern int __strtorx ANSI((CONST char*, char**, int, void*)); 148 extern int __strtorxL ANSI((CONST char*, char**, int, void*)); 149 #if 1 150 extern int __strtodI ANSI((CONST char*, char**, double*)); 151 extern int __strtopd ANSI((CONST char*, char**, double*)); 152 extern int __strtopdd ANSI((CONST char*, char**, double*)); 153 extern int __strtopf ANSI((CONST char*, char**, float*)); 154 extern int __strtopQ ANSI((CONST char*, char**, void*)); 155 extern int __strtopx ANSI((CONST char*, char**, void*)); 156 extern int __strtopxL ANSI((CONST char*, char**, void*)); 157 #else 158 #define __strtopd(s,se,x) strtord(s,se,1,x) 159 #define __strtopdd(s,se,x) strtordd(s,se,1,x) 160 #define __strtopf(s,se,x) strtorf(s,se,1,x) 161 #define __strtopQ(s,se,x) strtorQ(s,se,1,x) 162 #define __strtopx(s,se,x) strtorx(s,se,1,x) 163 #define __strtopxL(s,se,x) strtorxL(s,se,1,x) 164 #endif 165 __END_HIDDEN_DECLS 166 167 #ifdef __cplusplus 168 } 169 #endif 170 #endif /* GDTOA_H_INCLUDED */ 171
