static const char *bufend;
static const char *bufpos;
static strset_t stringset;
+bool allow_dollar_in_symbol = true;
/**
* Prints a parse error message at the current token.
}
#define SYMBOL_CHARS \
+ case '$': if (!allow_dollar_in_symbol) goto dollar_sign; \
case 'a': \
case 'b': \
case 'c': \
break;
default:
+dollar_sign:
goto end_symbol;
}
}
return;
default:
+dollar_sign:
errorf(&lexer_token.source_position, "unknown character '%c' found", c);
next_char();
lexer_token.type = T_ERROR;