Long
Long L;
L = (Long)(dval(&d));
L = (Long)(dval(&d) / ds);
Long L;
L = (Long)(dval(&d)/ds);
if ( (L = (Long)(dval(&d)/ds)) !=0)
extern int __strtodg ANSI((CONST char*, char**, FPI*, Long*, ULong*));
#ifndef Long
typedef unsigned Long ULong;
extern void ULtof ANSI((ULong*, ULong*, Long, int));
extern void ULtod ANSI((ULong*, ULong*, Long, int));
extern void ULtodd ANSI((ULong*, ULong*, Long, int));
extern void ULtoQ ANSI((ULong*, ULong*, Long, int));
extern void ULtox ANSI((UShort*, ULong*, Long, int));
extern void ULtoxL ANSI((ULong*, ULong*, Long, int));
extern int gethex ANSI((CONST char**, FPI*, Long*, Bigint**, int));
extern int strtoIg ANSI((CONST char*, char**, FPI*, Long*, Bigint**, int*));
e = -(((Long)(s-decpt)) << 2);
CONST char **sp; FPI *fpi; Long *exp; Bigint **bp; int sign;
gethex( CONST char **sp, FPI *fpi, Long *exp, Bigint **bp, int sign)
Long e, e1;
Long x, y;
L = (Long)aadj;
Long exp;
Long L;
U *d; FPI *fpi; Long *exp; ULong *bits; int exact, rd, *irv;
(U *d, FPI *fpi, Long *exp, ULong *bits, int exact, int rd, int *irv)
CONST char *s00; char **se; FPI *fpi; Long *exp; ULong *bits;
(CONST char *s00, char **se, FPI *fpi, Long *exp, ULong *bits)
Long L;
Long exp;
Long exp;
ULtoQ(L, bits, exp, k) ULong *L; ULong *bits; Long exp; int k;
ULtoQ(ULong *L, ULong *bits, Long exp, int k)
ULtod(L, bits, exp, k) ULong *L; ULong *bits; Long exp; int k;
ULtod(ULong *L, ULong *bits, Long exp, int k)
Long exp;
Long exp;
ULtox(L, bits, exp, k) UShort *L; ULong *bits; Long exp; int k;
ULtox(UShort *L, ULong *bits, Long exp, int k)
Long L;