2 files changed, 7 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index b3d88c26..a8714a2c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2011-10-05  Kaz Kylheku  <kaz@kylheku.com>
+
+	* match.c (match_files): In function calls, the deletion of
+	the unbound variable from the argument list can be done
+	with a destructive operation since that list is a copy.
+
 2011-10-04  Kaz Kylheku  <kaz@kylheku.com>
 
 	* LICENSE, Makefile, configure, filter.c, filter.h, gc.c, gc.h, hash.c,
diff --git a/match.c b/match.c
index 007d7645..94ede32d 100644
--- a/match.c
+++ b/match.c
@@ -2046,7 +2046,7 @@ repeat_spec_same_data:
                                         param,
                                         cdr(val));
               } else {
-                bindings_cp = alist_remove1(bindings_cp, param);
+                bindings_cp = alist_nremove1(bindings_cp, param);
                 ub_p_a_pairs = cons(cons(param, arg), ub_p_a_pairs);
               }
             } else {