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

add definitions for h_seq_index family of functions

Browse source
This commit is contained in:
Sven M. Hallberg 2013-01-25 18:37:04 +01:00
parent d6ef9ac526
commit 0b4002c697
1 changed files with 24 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

30
examples/glue.c
View file

@ -125,7 +125,7 @@ void * h_cast(HTokenType type, const HParsedToken *p)
return p->user; return p->user;
} }
HCountedArray *h_cast_seq (const HParsedToken *p) HCountedArray *h_cast_seq(const HParsedToken *p)
{ {
assert(p->token_type == TT_SEQUENCE); assert(p->token_type == TT_SEQUENCE);
return p->seq; return p->seq;
@ -137,13 +137,13 @@ HBytes h_cast_bytes(const HParsedToken *p)
return p->bytes; return p->bytes;
} }
int64_t h_cast_sint (const HParsedToken *p) int64_t h_cast_sint(const HParsedToken *p)
{ {
assert(p->token_type == TT_SINT); assert(p->token_type == TT_SINT);
return p->sint; return p->sint;
} }
uint64_t h_cast_uint (const HParsedToken *p) uint64_t h_cast_uint(const HParsedToken *p)
{ {
assert(p->token_type == TT_UINT); assert(p->token_type == TT_UINT);
return p->uint; return p->uint;
@ -163,9 +163,27 @@ HParsedToken *h_seq_index(const HParsedToken *p, size_t i)
return h_carray_index(p->seq, i); return h_carray_index(p->seq, i);
} }
HCountedArray *h_seq_index_seq(const HParsedToken *p, size_t i)
{
return h_cast_seq(h_seq_index(p, i));
}
HBytes h_seq_index_bytes(const HParsedToken *p, size_t i)
{
return h_cast_bytes(h_seq_index(p, i));
}
int64_t h_seq_index_sint(const HParsedToken *p, size_t i)
{
return h_cast_sint(h_seq_index(p, i));
}
uint64_t h_seq_index_uint(const HParsedToken *p, size_t i)
{
return h_cast_uint(h_seq_index(p, i));
}
void *h_seq_index_user(HTokenType type, const HParsedToken *p, size_t i) void *h_seq_index_user(HTokenType type, const HParsedToken *p, size_t i)
{ {
HParsedToken *elem = h_seq_index(p, i); return h_cast(type, h_seq_index(p, i));
assert(elem->token_type == (HTokenType)type);
return elem->user;
} }