emileclarkb/hammer
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add h_in (counterpart to h_not_in)

Browse source
This commit is contained in:
Sven M. Hallberg 2012-05-29 00:01:30 +02:00
parent 7678e8dd68
commit 2d5b90e174
2 changed files with 18 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/hammer.h
View file

@ -224,6 +224,13 @@ const HParser* h_whitespace(const HParser* p);
*/ */
const HParser* h_action(const HParser* p, const HAction a); const HParser* h_action(const HParser* p, const HAction a);
/**
* Parse a single character in the given charset.
*
* Result token type: TT_UINT
*/
const HParser* h_in(const uint8_t *charset, size_t length);
/** /**
* Parse a single character *NOT* in the given charset. * Parse a single character *NOT* in the given charset.
* *

14
src/parsers/charset.c
View file

@ -28,16 +28,24 @@ const HParser* h_ch_range(const uint8_t lower, const uint8_t upper) {
} }
const HParser* h_not_in(const uint8_t *options, size_t count) { const HParser* h_in_or_not(const uint8_t *options, size_t count, int val) {
HParser *ret = g_new(HParser, 1); HParser *ret = g_new(HParser, 1);
HCharset cs = new_charset(); HCharset cs = new_charset();
for (size_t i = 0; i < 256; i++) for (size_t i = 0; i < 256; i++)
charset_set(cs, i, 1); charset_set(cs, i, 1-val);
for (size_t i = 0; i < count; i++) for (size_t i = 0; i < count; i++)
charset_set(cs, options[i], 0); charset_set(cs, options[i], val);
ret->vtable = &charset_vt; ret->vtable = &charset_vt;
ret->env = (void*)cs; ret->env = (void*)cs;
return (const HParser*)ret; return (const HParser*)ret;
} }
const HParser* h_in(const uint8_t *options, size_t count) {
return h_in_or_not(options, count, 1);
}
const HParser* h_not_in(const uint8_t *options, size_t count) {
return h_in_or_not(options, count, 0);
}