summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/eval.c b/eval.c
index b4644bce..ddfb1185 100644
--- a/eval.c
+++ b/eval.c
@@ -1041,7 +1041,7 @@ static val op_modplace(val form, val env)
if (op == set_s) {
if (!third_arg_p)
- eval_error(form, lit("~a: missing argument"), op, place, nao);
+ eval_error(form, lit("~a: missing argument"), op, nao);
return set(*loc, eval(newform, env, form));
} else if (op == inc_s) {
val inc = or2(eval(newform, env, form), one);
@@ -1053,7 +1053,7 @@ static val op_modplace(val form, val env)
return mpush(newval, *loc);
} else if (op == pop_s) {
if (third_arg_p)
- eval_error(form, lit("~a: superfluous argument"), op, place, nao);
+ eval_error(form, lit("~a: superfluous argument"), op, nao);
return pop(loc);
} else if (op == flip_s) {
return *loc = nullp(*loc);