39
46
* external function declarations
41
bool check ____P((void));
42
bool hierror ____P((void));
43
bool intpr ____P((double t));
44
bool lowerror ____P((void));
45
double eval ____P((const struct expr *ep));
46
void am ____P((void));
47
void ama ____P((void));
48
void args ____P((int ac, char **av));
49
void defalt ____P((void));
50
void eu ____P((void));
51
void efree ____P((struct expr *ep));
52
void field ____P((void));
53
void maxerr ____P((void));
54
void panic ____P((const char *s));
55
void panicn ____P((const char *fmt, int n));
56
void pfree ____P((struct prt *pp));
57
void printq ____P((void));
58
void prval ____P((double x));
59
void maxerror ____P((void));
60
void resetflt ____P((void));
61
void rk ____P((void));
62
void rka ____P((void));
63
void rterror ____P((const char *s));
64
void rterrors ____P((const char *fmt, const char *s));
65
void rtsquawks ____P((const char *fmt, const char *s));
66
void setflt ____P((void));
67
void sfree ____P((struct sym *sp));
68
void solve ____P((void));
69
void startstep ____P((void));
70
void title ____P((void));
71
void trivial ____P((void));
72
struct expr * ealloc ____P((void));
73
struct prt * palloc ____P((void));
74
struct sym * lookup ____P((const char *nam));
75
struct sym * salloc ____P((void));
76
RETSIGTYPE fptrap ____P((int sig));
50
bool intpr (double t);
52
double eval (const struct expr *ep);
55
void args (int ac, char **av);
58
void efree (struct expr *ep);
61
void panic (const char *s);
62
void panicn (const char *fmt, int n);
63
void pfree (struct prt *pp);
65
void prval (double x);
70
void rterror (const char *s);
71
void rterrors (const char *fmt, const char *s);
72
void rtsquawks (const char *fmt, const char *s);
74
void sfree (struct sym *sp);
76
void startstep (void);
79
struct expr * ealloc (void);
80
struct prt * palloc (void);
81
struct sym * lookup (const char *nam);
82
struct sym * salloc (void);
83
RETSIGTYPE fptrap (int sig);
78
85
/* in scanner or parser */
79
int yyerror ____P((const char *msg));
80
int yylex ____P((void));
81
int yyparse ____P((void));
82
struct lex * lalloc ____P((void));
83
void concat ____P((struct expr *e0, struct expr *e1));
84
void lfree ____P((struct lex *lp));
85
void prexq ____P((const struct expr *ep));
86
int yyerror (const char *msg);
89
struct lex * lalloc (void);
90
void concat (struct expr *e0, struct expr *e1);
91
void lfree (struct lex *lp);
92
void prexq (const struct expr *ep);
87
94
/* math library exception handling */
88
95
#ifdef HAVE_MATHERR
89
int matherr ____P((struct exception *x));
97
int matherr (struct __exception *x);
99
int matherr (struct exception *x);
92
103
/* math functions in bessel.c and specfun.c */
94
double j0 ____P((double x));
95
double j1 ____P((double x));
96
double y0 ____P((double x));
97
double y1 ____P((double x));
105
double j0 (double x);
106
double j1 (double x);
107
double y0 (double x);
108
double y1 (double x);
99
110
#ifdef NO_SYSTEM_GAMMA
100
double f_lgamma ____P((double x));
111
double f_lgamma (double x);
101
112
#else /* not NO_SYSTEM_GAMMA, we link in vendor code */
102
113
#ifdef HAVE_LGAMMA
103
extern double lgamma ____P((double x)); /* declaration may be gratuitous */
114
extern double lgamma (double x); /* declaration may be gratuitous */
105
116
#ifdef HAVE_GAMMA
106
extern double gamma ____P((double x)); /* declaration may be gratuitous */
109
double f_gamma ____P((double x));
117
extern double gamma (double x); /* declaration may be gratuitous */
120
double f_gamma (double x);
111
double erf ____P((double x));
112
double erfc ____P((double x));
122
double erf (double x);
123
double erfc (double x);
114
double ibeta ____P((double a, double b, double x));
115
double igamma ____P((double a, double x));
116
double inverf ____P((double p));
117
double invnorm ____P((double p));
118
double norm ____P((double x));
125
double ibeta (double a, double b, double x);
126
double igamma (double a, double x);
127
double inverf (double p);
128
double invnorm (double p);
129
double norm (double x);
121
void display_usage ____P((const char *progname, const int *omit_vals, const char *appendage, bool fonts));
122
voidptr_t xcalloc ____P ((size_t nmemb, size_t size));
123
voidptr_t xmalloc ____P ((size_t size));
124
char *xstrdup ____P ((const char *s));
131
/* declare functions in libcommon */
132
#include "libcommon.h"
126
134
/* support C++ */
127
135
#ifdef __BEGIN_DECLS