diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2011-10-05 09:53:10 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2011-10-05 09:53:10 -0700 |
| commit | 9ea10a1408eb1cd63bd38f0367428b2b57b57b97 (patch) | |
| tree | 18e1cd02c8602524e01f90dc449bb5399ad8abcd /match.c | |
| parent | 044f4302cca6920ca315f7aea79391d6075b2840 (diff) | |
| download | txr-9ea10a1408eb1cd63bd38f0367428b2b57b57b97.tar.gz txr-9ea10a1408eb1cd63bd38f0367428b2b57b57b97.tar.bz2 txr-9ea10a1408eb1cd63bd38f0367428b2b57b57b97.zip | |
* 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.
Diffstat (limited to 'match.c')
| -rw-r--r-- | match.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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 { |