37 lines
1 KiB
C
37 lines
1 KiB
C
|
#ifndef HAMMER_EXAMPLES_GLUE__H
|
||
|
|
#define HAMMER_EXAMPLES_GLUE__H
|
||
|
|
|
||
|
|
#include <assert.h>
|
||
|
|
#include "../src/hammer.h"
|
||
|
|
|
||
|
|
///
|
||
|
|
// API Additions
|
||
|
|
///
|
||
|
|
|
||
|
|
#define H_RULE(rule, def) const HParser *rule = def
|
||
|
|
#define H_ARULE(rule, def) const HParser *rule = h_action(def, act_ ## rule)
|
||
|
|
|
||
|
|
const HParsedToken *act_ignore(const HParseResult *p);
|
||
|
|
const HParsedToken *act_index(int i, const HParseResult *p);
|
||
|
|
const HParsedToken *act_index0(const HParseResult *p);
|
||
|
|
|
||
|
|
HParsedToken *h_make_token(HArena *arena, HTokenType type, void *value);
|
||
|
|
|
||
|
|
#define H_MAKE(TYP) \
|
||
|
|
((TYP ## _t *) h_arena_malloc(p->arena, sizeof(TYP ## _t)))
|
||
|
|
|
||
|
|
#define H_MAKE_TOKEN(TYP, VAL) \
|
||
|
|
h_make_token(p->arena, TT_ ## TYP, VAL)
|
||
|
|
|
||
|
|
HParsedToken *h_carray_index(const HCountedArray *a, size_t i);
|
||
|
|
HParsedToken *h_seq_index(const HParsedToken *p, size_t i);
|
||
|
|
void *h_seq_index_user(HTokenType type, const HParsedToken *p, size_t i);
|
||
|
|
|
||
|
|
#define H_SEQ_INDEX(TYP, SEQ, IDX) \
|
||
|
|
((TYP ## _t *) h_seq_index_user(TT_ ## TYP, SEQ, IDX))
|
||
|
|
|
||
|
|
#define H_FIELD(TYP, IDX) \
|
||
|
|
H_SEQ_INDEX(TYP, p->ast, IDX)
|
||
|
|
|
||
|
|
#endif
|