diff options
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rw-r--r-- | match.c | 2 |
2 files changed, 7 insertions, 1 deletions
@@ -1,5 +1,11 @@ 2011-10-09 Kaz Kylheku <kaz@kylheku.com> + * match.c (vars_to_bindings): Regression fix: recent commit + caused test failure. An empty list not treated as a valid collect + variable list. + +2011-10-09 Kaz Kylheku <kaz@kylheku.com> + * configure: Fixed indentation. 2011-10-08 Kaz Kylheku <kaz@kylheku.com> @@ -292,7 +292,7 @@ static val vars_to_bindings(val lineno, val vars, val bindings) val iter; list_collect_decl (fixed_vars, tail); - if (!consp(vars)) + if (vars && !consp(vars)) sem_error(lineno, lit("not a valid variable list: ~a"), vars, nao); for (iter = vars; iter; iter = cdr(iter)) { |