1 files changed, 20 insertions, 34 deletions

diff --git a/miscutils/bc.c b/miscutils/bc.c
index 630a343d1..70ef0fa4a 100644
--- a/miscutils/bc.c
+++ b/miscutils/bc.c
@@ -549,9 +549,6 @@ enum {
 # define BC_STATUS void
 #endif
 
-struct BcLex;
-typedef BC_STATUS (*BcLexNext)(struct BcLex *) FAST_FUNC;
-
 typedef struct BcLex {
 
         const char *buf;
@@ -566,8 +563,6 @@ typedef struct BcLex {
                 BcVec v;
         } t;
 
-        BcLexNext next;
-
 } BcLex;
 
 #define BC_PARSE_STREND ((char) UCHAR_MAX)
@@ -2911,9 +2906,8 @@ static void bc_lex_name(BcLex *l)
         //return BC_STATUS_SUCCESS;
 }
 
-static void bc_lex_init(BcLex *l, BcLexNext next)
+static void bc_lex_init(BcLex *l)
 {
-        l->next = next;
         bc_char_vec_init(&l->t.v);
 }
 
@@ -2928,6 +2922,17 @@ static void bc_lex_file(BcLex *l)
         l->newline = false;
 }
 
+static BC_STATUS zbc_lex_token(BcLex *l);
+static BC_STATUS zdc_lex_token(BcLex *l);
+
+static BC_STATUS zcommon_lex_token(BcLex *l)
+{
+        if (IS_BC) {
+                IF_BC(RETURN_STATUS(zbc_lex_token(l));)
+        }
+        IF_DC(RETURN_STATUS(zdc_lex_token(l));)
+}
+
 static BC_STATUS zbc_lex_next(BcLex *l)
 {
         BcStatus s;
@@ -2947,7 +2952,7 @@ static BC_STATUS zbc_lex_next(BcLex *l)
         s = BC_STATUS_SUCCESS;
         do {
 //TODO: replace pointer with if(IS_BC)
-                ERROR_RETURN(s =) l->next(l);
+                ERROR_RETURN(s =) zcommon_lex_token(l);
         } while (!s && l->t.t == BC_LEX_WHITESPACE);
 
         RETURN_STATUS(s);
@@ -3091,7 +3096,7 @@ static BC_STATUS zbc_lex_comment(BcLex *l)
 # define zbc_lex_comment(...) (zbc_lex_comment(__VA_ARGS__), BC_STATUS_SUCCESS)
 #endif
 
-static FAST_FUNC BC_STATUS zbc_lex_token(BcLex *l)
+static BC_STATUS zbc_lex_token(BcLex *l)
 {
         BcStatus s = BC_STATUS_SUCCESS;
         char c = l->buf[l->i++], c2;
@@ -3341,7 +3346,7 @@ static BC_STATUS zdc_lex_string(BcLex *l)
 # define zdc_lex_string(...) (zdc_lex_string(__VA_ARGS__), BC_STATUS_SUCCESS)
 #endif
 
-static FAST_FUNC BC_STATUS zdc_lex_token(BcLex *l)
+static BC_STATUS zdc_lex_token(BcLex *l)
 {
         BcStatus s = BC_STATUS_SUCCESS;
         char c = l->buf[l->i++], c2;
@@ -3563,11 +3568,11 @@ static void bc_parse_free(BcParse *p)
         bc_lex_free(&p->l);
 }
 
-static void bc_parse_create(BcParse *p, size_t func, BcLexNext next)
+static void bc_parse_create(BcParse *p, size_t func)
 {
         memset(p, 0, sizeof(BcParse));
 
-        bc_lex_init(&p->l, next);
+        bc_lex_init(&p->l);
         bc_vec_init(&p->flags, sizeof(uint8_t), NULL);
         bc_vec_init(&p->exits, sizeof(BcInstPtr), NULL);
         bc_vec_init(&p->conds, sizeof(size_t), NULL);
@@ -4933,11 +4938,6 @@ static BC_STATUS zbc_parse_expr(BcParse *p, uint8_t flags, BcParseNext next)
 # define zbc_parse_expr(...) (zbc_parse_expr(__VA_ARGS__), BC_STATUS_SUCCESS)
 #endif
 
-static void bc_parse_init(BcParse *p, size_t func)
-{
-        bc_parse_create(p, func, zbc_lex_token);
-}
-
 static BC_STATUS zbc_parse_expression(BcParse *p, uint8_t flags)
 {
         RETURN_STATUS(zbc_parse_expr(p, flags, bc_parse_next_read));
@@ -5159,22 +5159,8 @@ static BC_STATUS zdc_parse_parse(BcParse *p)
 # define zdc_parse_parse(...) (zdc_parse_parse(__VA_ARGS__), BC_STATUS_SUCCESS)
 #endif
 
-static void dc_parse_init(BcParse *p, size_t func)
-{
-        bc_parse_create(p, func, zdc_lex_token);
-}
-
 #endif // ENABLE_DC
 
-static void common_parse_init(BcParse *p, size_t func)
-{
-        if (IS_BC) {
-                IF_BC(bc_parse_init(p, func);)
-        } else {
-                IF_DC(dc_parse_init(p, func);)
-        }
-}
-
 static BC_STATUS zcommon_parse_expr(BcParse *p, uint8_t flags)
 {
         if (IS_BC) {
@@ -5411,7 +5397,7 @@ static BC_STATUS zbc_program_read(void)
 
         bc_read_line(&buf);
 
-        common_parse_init(&parse, BC_PROG_READ);
+        bc_parse_create(&parse, BC_PROG_READ);
         bc_lex_file(&parse.l);
 
         s = zbc_parse_text(&parse, buf.v);
@@ -6612,7 +6598,7 @@ static BC_STATUS zbc_program_execStr(char *code, size_t *bgn,
         f = bc_program_func(fidx);
 
         if (f->code.len == 0) {
-                common_parse_init(&prs, fidx);
+                bc_parse_create(&prs, fidx);
                 s = zbc_parse_text(&prs, *str);
                 if (s) goto err;
                 s = zcommon_parse_expr(&prs, BC_PARSE_NOCALL);
@@ -7480,7 +7466,7 @@ static int bc_vm_init(const char *env_len)
         if (IS_BC)
                 IF_BC(bc_vm_envArgs();)
         bc_program_init();
-        common_parse_init(&G.prs, BC_PROG_MAIN);
+        bc_parse_create(&G.prs, BC_PROG_MAIN);
 
         if (isatty(0)) {
 #if ENABLE_FEATURE_BC_SIGNALS