* parser.y (repeat_rep_helper): Bugfix. Circular lists

were being created here when clauses of the same kind appear multiple
times. The problem is that append2 no longer copies the second list,
which the code was relying on it to do.

1 files changed, 1 insertions, 1 deletions

diff --git a/parser.y b/parser.y
index 9703a078..ef7fefdf 100644
--- a/parser.y
+++ b/parser.y
@@ -793,7 +793,7 @@ static val repeat_rep_helper(val sym, val main, val parts)
   for (iter = parts; iter != nil; iter = cdr(iter)) {
     val part = car(iter);
     val sym = car(part);
-    val clauses = cdr(part);
+    val clauses = copy_list(cdr(part));
 
     if (sym == single_s)
       single_parts = nappend2(single_parts, clauses);