From 482851b3e216bfefed02832c82120bfdf056ae6c Mon Sep 17 00:00:00 2001
From: "Sven M. Hallberg" <pesco@khjk.org>
Date: Mon, 20 May 2013 15:24:19 +0200
Subject: [PATCH] reshape for h_action and h_choice
---
src/parsers/action.c | 1 +
src/parsers/choice.c | 1 +
2 files changed, 2 insertions(+)
diff --git a/src/parsers/action.c b/src/parsers/action.c
index f708881c..12ec036f 100644
--- a/src/parsers/action.c
+++ b/src/parsers/action.c
@@ -31,6 +31,7 @@ static HCFChoice* desugar_action(HAllocator *mm__, void *env) {
ret->seq[0] = seq;
ret->seq[1] = NULL;
ret->action = a->action;
+ ret->reshape = h_act_first;
return ret;
}
diff --git a/src/parsers/choice.c b/src/parsers/choice.c
index 9a186252..30cc725b 100644
--- a/src/parsers/choice.c
+++ b/src/parsers/choice.c
@@ -51,6 +51,7 @@ static HCFChoice* desugar_choice(HAllocator *mm__, void *env) {
ret->seq[i]->items[1] = NULL;
}
ret->seq[s->len] = NULL;
+ ret->reshape = h_act_first;
return ret;
}
--
GitLab