33 lines
696 B
C
33 lines
696 B
C
|
#include "parser_internal.h"
|
||
|
|
|
||
|
|
typedef struct {
|
||
|
|
const HParser *p;
|
||
|
|
HPredicate pred;
|
||
|
|
} HAttrBool;
|
||
|
|
|
||
|
|
static HParseResult* parse_attr_bool(void *env, HParseState *state) {
|
||
|
|
HAttrBool *a = (HAttrBool*)env;
|
||
|
|
HParseResult *res = h_do_parse(a->p, state);
|
||
|
|
if (res && res->ast) {
|
||
|
|
if (a->pred(res))
|
||
|
|
return res;
|
||
|
|
else
|
||
|
|
return NULL;
|
||
|
|
} else
|
||
|
|
return NULL;
|
||
|
|
}
|
||
|
|
|
||
|
|
static const HParserVtable attr_bool_vt = {
|
||
|
|
.parse = parse_attr_bool,
|
||
|
|
};
|
||
|
|
|
||
|
|
const HParser* h_attr_bool(const HParser* p, HPredicate pred) {
|
||
|
|
HParser *res = g_new(HParser, 1);
|
||
|
|
res->vtable = &attr_bool_vt;
|
||
|
|
HAttrBool *env = g_new(HAttrBool, 1);
|
||
|
|
env->p = p;
|
||
|
|
env->pred = pred;
|
||
|
|
res->env = (void*)env;
|
||
|
|
return res;
|
||
|
|
}
|