forked from KolibriOS/kolibrios
34 lines
840 B
C
34 lines
840 B
C
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <errno.h>
|
|
#include <limits.h>
|
|
#include <math.h>
|
|
#ifndef CYGNUS_NEC
|
|
#include <ctype.h>
|
|
#endif
|
|
|
|
#define Ise(c) ((c == 'e') || (c == 'E') || (c == 'd') || (c == 'D'))
|
|
#define Isdigit(c) ((c <= '9') && (c >= '0'))
|
|
#define Isspace(c) ((c == ' ') || (c == '\t') || (c=='\n') || (c=='\v') \
|
|
|| (c == '\r') || (c == '\f'))
|
|
#define Issign(c) ((c == '-') || (c == '+'))
|
|
#define Val(c) ((c - '0'))
|
|
|
|
#define MAXE 308
|
|
#define MINE (-308)
|
|
|
|
/* flags */
|
|
#define SIGN 0x01
|
|
#define ESIGN 0x02
|
|
#define DECP 0x04
|
|
|
|
#ifdef _HAVE_STDC
|
|
int __ten_mul(double *acc, int digit);
|
|
double __adjust(struct _reent *ptr, double *acc, int dexp, int sign);
|
|
double __exp10(unsigned x);
|
|
#else
|
|
int __ten_mul();
|
|
double __adjust();
|
|
double __exp10();
|
|
#endif
|