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

fixed build errors wrt sentinels

Browse source
This commit is contained in:
Mikael Vejdemo-Johansson 2015-04-08 13:46:42 +02:00
parent 9a1812bd49
commit 61a211559e
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
examples/ties.c
View file

@ -160,7 +160,7 @@ HParser* finkmao() {
h_bind_indirect(Lnext, L_); h_bind_indirect(Lnext, L_);
h_bind_indirect(Rnext, R_); h_bind_indirect(Rnext, R_);
h_bind_indirect(Cnext, C_); h_bind_indirect(Cnext, C_);
HParser *tie = h_choice(h_sequence(L, Lnext), NULL); HParser *tie = h_choice(h_sequence(L, Lnext, NULL), NULL);
return tie; return tie;
} }
@ -173,7 +173,7 @@ HParser* finkmaoTW() {
HParser *tuck = h_choice(h_sequence(T, T, U, NULL), HParser *tuck = h_choice(h_sequence(T, T, U, NULL),
h_sequence(W, W, U, NULL), h_sequence(W, W, U, NULL),
NULL); NULL);
return h_choice(h_sequence(prefix, h_many(pair), tuck, NULL)); return h_choice(h_sequence(prefix, h_many(pair), tuck, NULL), NULL);
} }
HParser* depth1TW() { HParser* depth1TW() {
@ -185,7 +185,7 @@ HParser* depth1TW() {
HParser *tuck = h_choice(h_sequence(T, T, U, NULL), HParser *tuck = h_choice(h_sequence(T, T, U, NULL),
h_sequence(W, W, U, NULL), h_sequence(W, W, U, NULL),
NULL); NULL);
return h_choice(h_sequence(prefix, h_many(h_choice(pair, tuck)), tuck, NULL)); return h_choice(h_sequence(prefix, h_many(h_choice(pair, tuck, NULL)), tuck, NULL), NULL);
} }
HParser* depth1() { HParser* depth1() {
@ -309,7 +309,7 @@ HParser* depthNTW() {
h_bind_indirect(wt2, wt2_); h_bind_indirect(wt2, wt2_);
HParser *tuck = h_choice(tstart, wstart, NULL); HParser *tuck = h_choice(tstart, wstart, NULL);
return h_choice(h_sequence(prefix, h_many(h_choice(pair, tuck)), tuck, NULL)); return h_choice(h_sequence(prefix, h_many(h_choice(pair, tuck, NULL)), tuck, NULL), NULL);
} }