bc: delete G.prog.strmb for real

Signed-off-by: Denys Vlasenko <vda.linux@googlemail.com>
This commit is contained in:
Denys Vlasenko
2018-12-19 12:47:45 +01:00
parent b80d7aad1b
commit 4796a1d537

View File

@@ -362,15 +362,13 @@ typedef enum BcResultType {
BC_RESULT_STR, BC_RESULT_STR,
BC_RESULT_IBASE, //code uses "inst - BC_INST_IBASE + BC_RESULT_IBASE" construct,
BC_RESULT_SCALE, BC_RESULT_IBASE, // relative order should match for: BC_INST_IBASE
BC_RESULT_LAST, BC_RESULT_SCALE, // relative order should match for: BC_INST_SCALE
BC_RESULT_LAST, // relative order should match for: BC_INST_LAST
// These are between to calculate ibase, obase, and last from instructions.
BC_RESULT_CONSTANT, BC_RESULT_CONSTANT,
BC_RESULT_ONE, BC_RESULT_ONE,
BC_RESULT_OBASE, // relative order should match for: BC_INST_OBASE
BC_RESULT_OBASE,
} BcResultType; } BcResultType;
typedef union BcResultData { typedef union BcResultData {
@@ -485,12 +483,13 @@ typedef enum BcLexType {
BC_LEX_ASCIIFY, BC_LEX_ASCIIFY,
BC_LEX_PRINT_STREAM, BC_LEX_PRINT_STREAM,
BC_LEX_STORE_IBASE, // code uses "t - BC_LEX_STORE_IBASE + BC_INST_IBASE" construct,
BC_LEX_STORE_SCALE, BC_LEX_STORE_IBASE, // relative order should match for: BC_INST_IBASE
BC_LEX_STORE_SCALE, // relative order should match for: BC_INST_SCALE
BC_LEX_LOAD, BC_LEX_LOAD,
BC_LEX_LOAD_POP, BC_LEX_LOAD_POP,
BC_LEX_STORE_PUSH, BC_LEX_STORE_PUSH,
BC_LEX_STORE_OBASE, BC_LEX_STORE_OBASE, // relative order should match for: BC_INST_OBASE
BC_LEX_PRINT_POP, BC_LEX_PRINT_POP,
BC_LEX_NQUIT, BC_LEX_NQUIT,
BC_LEX_SCALE_FACTOR, BC_LEX_SCALE_FACTOR,
@@ -641,7 +640,6 @@ dc_parse_insts[] = {
}; };
#endif // ENABLE_DC #endif // ENABLE_DC
typedef struct BcLex { typedef struct BcLex {
const char *buf; const char *buf;
size_t i; size_t i;
@@ -655,7 +653,7 @@ typedef struct BcLex {
} t; } t;
} BcLex; } BcLex;
#define BC_PARSE_STREND ((char) UCHAR_MAX) #define BC_PARSE_STREND (0xff)
#define BC_PARSE_REL (1 << 0) #define BC_PARSE_REL (1 << 0)
#define BC_PARSE_PRINT (1 << 1) #define BC_PARSE_PRINT (1 << 1)
@@ -685,10 +683,6 @@ typedef struct BcProgram {
size_t ob_t; size_t ob_t;
BcNum ob; BcNum ob;
#if ENABLE_DC
BcNum strmb;
#endif
BcVec results; BcVec results;
BcVec exestack; BcVec exestack;