|
|
1.1 ! root 1: extern int yywrap(void); ! 2: extern void setfname(Cell *); ! 3: extern int constnode(Node *); ! 4: extern uchar *strnode(Node *); ! 5: extern Node *notnull(Node *); ! 6: extern int yyparse(void); ! 7: ! 8: extern int yylex(void); ! 9: extern void startreg(void); ! 10: extern int input(void); ! 11: extern void unput(int); ! 12: extern void unputstr(char *); ! 13: extern int yylook(void); ! 14: extern int yyback(int *, int); ! 15: extern int yyinput(void); ! 16: ! 17: extern fa *makedfa(uchar *, int); ! 18: extern fa *mkdfa(uchar *, int); ! 19: extern int makeinit(fa *, int); ! 20: extern void penter(Node *); ! 21: extern void freetr(Node *); ! 22: extern int hexstr(char **); ! 23: extern int quoted(char **); ! 24: extern uchar *cclenter(uchar *); ! 25: extern void overflo(uchar *); ! 26: extern void cfoll(fa *, Node *); ! 27: extern int first(Node *); ! 28: extern void follow(Node *); ! 29: extern int member(int, uchar *); ! 30: extern int match(fa *, uchar *); ! 31: extern int pmatch(fa *, uchar *); ! 32: extern int nematch(fa *, uchar *); ! 33: extern Node *reparse(uchar *); ! 34: extern Node *regexp(void); ! 35: extern Node *primary(void); ! 36: extern Node *concat(Node *); ! 37: extern Node *alt(Node *); ! 38: extern Node *unary(Node *); ! 39: extern int relex(void); ! 40: extern int cgoto(fa *, int, int); ! 41: extern void freefa(fa *); ! 42: ! 43: extern int main(int, uchar **); ! 44: extern int pgetc(void); ! 45: ! 46: extern Node *nodealloc(int); ! 47: extern Node *exptostat(Node *); ! 48: extern Node *node1(int, Node *); ! 49: extern Node *node2(int, Node *, Node *); ! 50: extern Node *node3(int, Node *, Node *, Node *); ! 51: extern Node *node4(int, Node *, Node *, Node *, Node *); ! 52: extern Node *stat3(int, Node *, Node *, Node *); ! 53: extern Node *op2(int, Node *, Node *); ! 54: extern Node *op1(int, Node *); ! 55: extern Node *stat1(int, Node *); ! 56: extern Node *op3(int, Node *, Node *, Node *); ! 57: extern Node *op4(int, Node *, Node *, Node *, Node *); ! 58: extern Node *stat2(int, Node *, Node *); ! 59: extern Node *stat4(int, Node *, Node *, Node *, Node *); ! 60: extern Node *valtonode(Cell *, int); ! 61: extern Node *rectonode(void); ! 62: extern Node *makearr(Node *); ! 63: extern Node *pa2stat(Node *, Node *, Node *); ! 64: extern Node *linkum(Node *, Node *); ! 65: extern void defn(Cell *, Node *, Node *); ! 66: extern int isarg(uchar *); ! 67: extern uchar *tokname(int); ! 68: extern Cell *(*proctab[])(Node **, int); ! 69: ! 70: extern void syminit(void); ! 71: extern void arginit(int, uchar **); ! 72: extern void envinit(uchar **); ! 73: extern Array *makesymtab(int); ! 74: extern void freesymtab(Cell *); ! 75: extern void freeelem(Cell *, uchar *); ! 76: extern Cell *setsymtab(uchar *, uchar *, double, unsigned int, Array *); ! 77: extern int hash(uchar *, int); ! 78: extern void rehash(Array *); ! 79: extern Cell *lookup(uchar *, Array *); ! 80: extern double setfval(Cell *, double); ! 81: extern void funnyvar(Cell *, char *); ! 82: extern uchar *setsval(Cell *, uchar *); ! 83: extern double r_getfval(Cell *); ! 84: extern uchar *r_getsval(Cell *); ! 85: extern uchar *tostring(uchar *); ! 86: extern uchar *qstring(uchar *, int); ! 87: ! 88: extern void recinit(unsigned int); ! 89: extern void initgetrec(void); ! 90: extern int getrec(uchar *); ! 91: extern int readrec(uchar *buf, int bufsize, FILE *inf); ! 92: extern uchar *getargv(int); ! 93: extern void setclvar(uchar *); ! 94: extern void fldbld(void); ! 95: extern void cleanfld(int, int); ! 96: extern void newfld(int); ! 97: extern int refldbld(uchar *, uchar *); ! 98: extern void recbld(void); ! 99: extern Cell *fieldadr(int); ! 100: extern void yyerror(char *); ! 101: extern void fpecatch(int); ! 102: extern void bracecheck(void); ! 103: extern void bcheck2(int, int, int); ! 104: extern void error(int, char *); ! 105: extern void eprint(void); ! 106: extern void bclass(int); ! 107: extern double errcheck(double, uchar *); ! 108: extern int isclvar(uchar *); ! 109: extern int isnumber(uchar *); ! 110: ! 111: extern void run(Node *); ! 112: extern Cell *r_execute(Node *); ! 113: extern Cell *program(Node **, int); ! 114: extern Cell *call(Node **, int); ! 115: extern Cell *copycell(Cell *); ! 116: extern Cell *arg(Node **, int); ! 117: extern Cell *jump(Node **, int); ! 118: extern Cell *getline(Node **, int); ! 119: extern Cell *getnf(Node **, int); ! 120: extern Cell *array(Node **, int); ! 121: extern Cell *adelete(Node **, int); ! 122: extern Cell *intest(Node **, int); ! 123: extern Cell *matchop(Node **, int); ! 124: extern Cell *boolop(Node **, int); ! 125: extern Cell *relop(Node **, int); ! 126: extern void tfree(Cell *); ! 127: extern Cell *gettemp(void); ! 128: extern Cell *field(Node **, int); ! 129: extern Cell *indirect(Node **, int); ! 130: extern Cell *substr(Node **, int); ! 131: extern Cell *sindex(Node **, int); ! 132: extern int format(uchar *, int, uchar *, Node *); ! 133: extern Cell *asprintf(Node **, int); ! 134: extern Cell *aprintf(Node **, int); ! 135: extern Cell *arith(Node **, int); ! 136: extern double ipow(double, int); ! 137: extern Cell *incrdecr(Node **, int); ! 138: extern Cell *assign(Node **, int); ! 139: extern Cell *cat(Node **, int); ! 140: extern Cell *pastat(Node **, int); ! 141: extern Cell *dopa2(Node **, int); ! 142: extern Cell *split(Node **, int); ! 143: extern Cell *condexpr(Node **, int); ! 144: extern Cell *ifstat(Node **, int); ! 145: extern Cell *whilestat(Node **, int); ! 146: extern Cell *dostat(Node **, int); ! 147: extern Cell *forstat(Node **, int); ! 148: extern Cell *instat(Node **, int); ! 149: extern Cell *bltin(Node **, int); ! 150: extern Cell *printstat(Node **, int); ! 151: extern Cell *nullproc(Node **, int); ! 152: extern FILE *redirect(int, Node *); ! 153: extern FILE *openfile(int, uchar *); ! 154: extern uchar *filename(FILE *); ! 155: extern Cell *closefile(Node **, int); ! 156: extern void closeall(void); ! 157: extern Cell *sub(Node **, int); ! 158: extern Cell *gsub(Node **, int); ! 159: ! 160: extern FILE *popen(const char *, const char *); ! 161: extern int pclose(FILE *);
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.