|
|
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.