summaryrefslogtreecommitdiff
path: root/src/commit.c
diff options
context:
space:
mode:
authorAdrian Thurston <thurston@complang.org>2015-10-07 13:23:27 -0400
committerAdrian Thurston <thurston@complang.org>2015-10-07 13:23:27 -0400
commitccaa108e29f630cea0033d6719f524625d1768b0 (patch)
treea71335f637b193cdf6315da1f491c9f4b1e10263 /src/commit.c
parentac382923c5a772a9e2d64d2a4e69c04814cff82b (diff)
downloadcolm-ccaa108e29f630cea0033d6719f524625d1768b0.tar.gz
declare lhs and rhs vars before use
Diffstat (limited to 'src/commit.c')
-rw-r--r--src/commit.c24
1 files changed, 1 insertions, 23 deletions
diff --git a/src/commit.c b/src/commit.c
index 2d1d84d5..b21fa7b5 100644
--- a/src/commit.c
+++ b/src/commit.c
@@ -82,28 +82,6 @@ static int been_committed( parse_tree_t *parse_tree )
return parse_tree->flags & PF_COMMITTED;
}
-void commit_clear( program_t *prg, tree_t **root, struct pda_run *pda_run )
-{
- tree_t **sp = root;
- parse_tree_t *pt = pda_run->stack_top;
-
- /* The top level of the stack is linked right to left. This is the
- * traversal order we need for committing. */
- while ( pt != 0 && !been_committed( pt ) ) {
- vm_push_ptree( pt );
- pt = pt->next;
- }
-
- while ( sp != root ) {
- pt = vm_pop_ptree();
-
- commit_clear_parse_tree( prg, sp, pda_run, pt->child );
-
- pt->flags |= PF_COMMITTED;
- pt = pt->next;
- }
-}
-
void commit_reduce( program_t *prg, tree_t **root, struct pda_run *pda_run )
{
tree_t **sp = root;
@@ -119,7 +97,7 @@ void commit_reduce( program_t *prg, tree_t **root, struct pda_run *pda_run )
while ( sp != root ) {
pt = vm_pop_ptree();
- commit_forward_recurse( prg, sp, pda_run, pt );
+ commit_reduce_forward( prg, sp, pda_run, pt );
pt->child = 0;
pt->flags |= PF_COMMITTED;