--- ray/src/common/calcomp.h 1992/09/21 12:01:33 2.2 +++ ray/src/common/calcomp.h 1997/08/26 17:15:10 2.5 @@ -32,7 +32,7 @@ typedef struct epnode { double num; /* number */ char *name; /* symbol name */ int chan; /* channel number */ - long tick; /* timestamp */ + unsigned long tick; /* timestamp */ struct vardef { char *name; /* variable name */ int nlinks; /* number of references */ @@ -45,7 +45,7 @@ typedef struct epnode { typedef struct vardef VARDEF; /* a variable definition */ -#define MAXWORD 63 /* maximum word/id length */ +#define MAXWORD 127 /* maximum word/id length */ #define CNTXMARK '`' /* context mark */ #define isid(c) (isalnum(c) || (c) == '_' || \ @@ -55,13 +55,14 @@ extern double eval(), varvalue(), chanvalue(), funval extern double argument(), getnum(); extern double (*eoper[])(); extern int getinum(); -extern char *getname(), *qualname(), *setcontext(), *argfun(); +extern char *getname(), *qualname(), *argfun(); +extern char *setcontext(), *pushcontext(), *popcontext(); extern EPNODE *eparse(), *ekid(), *dlookup(), *dpop(), *dfirst(), *dnext(); extern EPNODE *getdefn(), *getchan(); extern EPNODE *getE1(), *getE2(), *getE3(), *getE4(), *getE5(), *rconst(); extern VARDEF *varinsert(), *varlookup(), *argf(); extern LIBR *liblookup(); -extern long eclock; +extern unsigned long eclock; extern int nextc; #define evalue(ep) (*eoper[(ep)->type])(ep)