diff options
Diffstat (limited to 'libraries/embryo/src/bin/embryo_cc_scvars.c')
-rw-r--r-- | libraries/embryo/src/bin/embryo_cc_scvars.c | 88 |
1 files changed, 0 insertions, 88 deletions
diff --git a/libraries/embryo/src/bin/embryo_cc_scvars.c b/libraries/embryo/src/bin/embryo_cc_scvars.c deleted file mode 100644 index fb9eb12..0000000 --- a/libraries/embryo/src/bin/embryo_cc_scvars.c +++ /dev/null | |||
@@ -1,88 +0,0 @@ | |||
1 | /* Small compiler | ||
2 | * | ||
3 | * Global (cross-module) variables. | ||
4 | * | ||
5 | * Copyright (c) ITB CompuPhase, 1997-2003 | ||
6 | * | ||
7 | * This software is provided "as-is", without any express or implied warranty. | ||
8 | * In no event will the authors be held liable for any damages arising from | ||
9 | * the use of this software. | ||
10 | * | ||
11 | * Permission is granted to anyone to use this software for any purpose, | ||
12 | * including commercial applications, and to alter it and redistribute it | ||
13 | * freely, subject to the following restrictions: | ||
14 | * | ||
15 | * 1. The origin of this software must not be misrepresented; you must not | ||
16 | * claim that you wrote the original software. If you use this software in | ||
17 | * a product, an acknowledgment in the product documentation would be | ||
18 | * appreciated but is not required. | ||
19 | * 2. Altered source versions must be plainly marked as such, and must not be | ||
20 | * misrepresented as being the original software. | ||
21 | * 3. This notice may not be removed or altered from any source distribution. | ||
22 | * | ||
23 | * Version: $Id: embryo_cc_scvars.c 50816 2010-08-04 16:57:32Z lucas $ | ||
24 | */ | ||
25 | |||
26 | |||
27 | #ifdef HAVE_CONFIG_H | ||
28 | # include <config.h> /* for PATH_MAX */ | ||
29 | #endif | ||
30 | |||
31 | #include "embryo_cc_sc.h" | ||
32 | |||
33 | /* global variables | ||
34 | * | ||
35 | * All global variables that are shared amongst the compiler files are | ||
36 | * declared here. | ||
37 | */ | ||
38 | symbol loctab; /* local symbol table */ | ||
39 | symbol glbtab; /* global symbol table */ | ||
40 | cell *litq; /* the literal queue */ | ||
41 | char pline[sLINEMAX + 1]; /* the line read from the input file */ | ||
42 | char *lptr; /* points to the current position in "pline" */ | ||
43 | constvalue tagname_tab = { NULL, "", 0, 0 }; /* tagname table */ | ||
44 | constvalue libname_tab = { NULL, "", 0, 0 }; /* library table (#pragma library "..." syntax) */ | ||
45 | constvalue *curlibrary = NULL; /* current library */ | ||
46 | symbol *curfunc; /* pointer to current function */ | ||
47 | char *inpfname; /* pointer to name of the file currently read from */ | ||
48 | char outfname[PATH_MAX]; /* output file name */ | ||
49 | char sc_ctrlchar = CTRL_CHAR; /* the control character (or escape character) */ | ||
50 | int litidx = 0; /* index to literal table */ | ||
51 | int litmax = sDEF_LITMAX; /* current size of the literal table */ | ||
52 | int stgidx = 0; /* index to the staging buffer */ | ||
53 | int labnum = 0; /* number of (internal) labels */ | ||
54 | int staging = 0; /* true if staging output */ | ||
55 | cell declared = 0; /* number of local cells declared */ | ||
56 | cell glb_declared = 0; /* number of global cells declared */ | ||
57 | cell code_idx = 0; /* number of bytes with generated code */ | ||
58 | int ntv_funcid = 0; /* incremental number of native function */ | ||
59 | int errnum = 0; /* number of errors */ | ||
60 | int warnnum = 0; /* number of warnings */ | ||
61 | int sc_debug = sCHKBOUNDS; /* by default: bounds checking+assertions */ | ||
62 | int charbits = 8; /* a "char" is 8 bits */ | ||
63 | int sc_packstr = FALSE; /* strings are packed by default? */ | ||
64 | int sc_compress = TRUE; /* compress bytecode? */ | ||
65 | int sc_needsemicolon = TRUE; /* semicolon required to terminate expressions? */ | ||
66 | int sc_dataalign = sizeof(cell); /* data alignment value */ | ||
67 | int sc_alignnext = FALSE; /* must frame of the next function be aligned? */ | ||
68 | int curseg = 0; /* 1 if currently parsing CODE, 2 if parsing DATA */ | ||
69 | cell sc_stksize = sDEF_AMXSTACK; /* default stack size */ | ||
70 | int freading = FALSE; /* Is there an input file ready for reading? */ | ||
71 | int fline = 0; /* the line number in the current file */ | ||
72 | int fnumber = 0; /* the file number in the file table (debugging) */ | ||
73 | int fcurrent = 0; /* current file being processed (debugging) */ | ||
74 | int intest = 0; /* true if inside a test */ | ||
75 | int sideeffect = 0; /* true if an expression causes a side-effect */ | ||
76 | int stmtindent = 0; /* current indent of the statement */ | ||
77 | int indent_nowarn = TRUE; /* skip warning "217 loose indentation" */ | ||
78 | int sc_tabsize = 8; /* number of spaces that a TAB represents */ | ||
79 | int sc_allowtags = TRUE; /* allow/detect tagnames in lex() */ | ||
80 | int sc_status; /* read/write status */ | ||
81 | int sc_rationaltag = 0; /* tag for rational numbers */ | ||
82 | int rational_digits = 0; /* number of fractional digits */ | ||
83 | |||
84 | FILE *inpf = NULL; /* file read from (source or include) */ | ||
85 | FILE *inpf_org = NULL; /* main source file */ | ||
86 | FILE *outf = NULL; /* file written to */ | ||
87 | |||
88 | jmp_buf errbuf; | ||