reshape for h_left and friends
This commit is contained in:
parent
745aaebe02
commit
31256ba867
3 changed files with 31 additions and 2 deletions
|
|
@ -17,9 +17,11 @@ static HParseResult* parse_whitespace(void* env, HParseState *state) {
|
|||
|
||||
static const char SPACE_CHRS[6] = {' ', '\f', '\n', '\r', '\t', '\v'};
|
||||
|
||||
static const HParsedToken *h_act_last(const HParseResult *p) {
|
||||
// XXX to be consolidated with glue.c when merged upstream
|
||||
const HParsedToken *h_act_last(const HParseResult *p) {
|
||||
assert(p->ast);
|
||||
assert(p->ast->token_type == TT_SEQUENCE);
|
||||
assert(p->ast->seq->used > 0);
|
||||
|
||||
return p->ast->seq->elements[p->ast->seq->used-1];
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue