|
|
1.1 ! root 1: /* ! 2: * global variables: ! 3: */ ! 4: ! 5: int trace, /* execution trace flag */ ! 6: tflg, /* debugging flag */ ! 7: attnflg, /* keyboard interrupt flag */ ! 8: tty, /* non-zero if input is from terminal */ ! 9: col, /* current column number for stdin */ ! 10: typelens[]; /* defined in sym.c */ ! 11: char *prompt, /* pointer to current prompt string */ ! 12: *tokens[], /* defined in token.c */ ! 13: *tempfile, /* temporary file name for editing (cmds.c) */ ! 14: curfile[MAXFILENAME]; /* name of current input file */ ! 15: FILE *infile; /* file pointer of current input file */ ! 16: ! 17: char *lines, /* pointer to beginning of line buffer */ ! 18: *endlines, /* pointer to end of line buffer */ ! 19: *lastline; /* line buffer free pointer */ ! 20: int linecnt; /* number of lines in the buffer */ ! 21: ! 22: char *symspace, /* pointer to beginning of symbol table space */ ! 23: *symend, /* pointer to end of symbol table space */ ! 24: *symlast; /* symbol table free pointer */ ! 25: Symptr chains[3][MAXTYPES]; /* symbol table list headers: ! 26: * scalar, vector, fn for each type ! 27: */ ! 28: ! 29: char stkspace[MAXSTACK], /* execution stack space */ ! 30: *stkptr; /* pointer to current top of stack */ ! 31: ! 32: char strspace[MAXSTRSPACE], /* string table space */ ! 33: *strptr; /* string table free pointer */ ! 34: ! 35: char askline[MAXLINELEN], /* data line for INPUT/ASK statement */ ! 36: *askptr, /* current position in askline */ ! 37: askdelims[]; /* defined in io.c */ ! 38: ! 39: char lnrdelims[]; /* defined in main.c */ ! 40: ! 41: int argcnt; /* count for ARG$ */ ! 42: char **argvec; /* argument strings for ARG$ */ ! 43: ! 44: Stkfr gosub, /* for use in GOSUB statements */ ! 45: data; /* indicates position of DATA statements */ ! 46: ! 47: int nsubs, /* used in variable declarations */ ! 48: subsc[MAXSUBS]; ! 49: ! 50: Linep curline; /* pointer to line being interpreted */ ! 51: char *inptr; /* position in said line */ ! 52: struct textline immed; /* intermediate line structure */ ! 53: ! 54: Linep nextline(); /* required by ALL_LINES macro */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.