diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2014-02-21 20:01:07 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2014-02-21 20:01:07 -0800 |
| commit | a9fe8b63f5013c25ab84922d0dbd0afd52f3dcd2 (patch) | |
| tree | 821eaa5b29ddf7a12d8a2bed288341943b9012f4 /eval.c | |
| parent | 4c5b04a6cac0d43e83aa2dc4f800eab42e908486 (diff) | |
| download | txr-a9fe8b63f5013c25ab84922d0dbd0afd52f3dcd2.tar.gz txr-a9fe8b63f5013c25ab84922d0dbd0afd52f3dcd2.tar.bz2 txr-a9fe8b63f5013c25ab84922d0dbd0afd52f3dcd2.zip | |
* eval.c (subst_vars): Change throwing of query_error_s
to eval_error call. This is a leftover from when this was cloned
from its counterpart in match.c. However, I can't think of a way
this call can ever be reached.
Diffstat (limited to 'eval.c')
| -rw-r--r-- | eval.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -1637,8 +1637,7 @@ static val subst_vars(val forms, val env) forms = cons(str, rest(forms)); continue; } - uw_throwf(query_error_s, lit("unbound variable ~a"), - form, nao); + eval_error(forms, lit("unbound variable ~s"), form, nao); } iter = list_collect(iter, form); |