22 |
|
enum {CIE_X, CIE_Y, CIE_Z}; |
23 |
|
/* assumed maximum # Klems patches */ |
24 |
|
#define MAXPATCHES 145 |
25 |
– |
/* global argv[0] */ |
26 |
– |
char *progname; |
25 |
|
/* selected basis function name */ |
26 |
|
static const char klems_full[] = "LBNL/Klems Full"; |
27 |
|
static const char klems_half[] = "LBNL/Klems Half"; |
619 |
|
char buf[1024]; |
620 |
|
char *cp; |
621 |
|
int i, na; |
622 |
< |
|
623 |
< |
progname = argv[0]; |
622 |
> |
/* set global progname */ |
623 |
> |
fixargv0(argv[0]); |
624 |
|
esupport |= E_VARIABLE|E_FUNCTION|E_RCONST; |
625 |
|
esupport &= ~(E_INCHAN|E_OUTCHAN); |
626 |
|
scompile("PI:3.14159265358979323846", NULL, 0); |