* eval.c (op_quote): Improved diagnostic.

1 files changed, 1 insertions, 1 deletions

diff --git a/eval.c b/eval.c
index 6450501f..d3605da8 100644
--- a/eval.c
+++ b/eval.c
@@ -1114,7 +1114,7 @@ static val op_quote(val form, val env)
   val d = cdr(form);
 
   if (!consp(d) || cdr(d))
-    eval_error(form, lit("bad quote syntax"), nao);
+    eval_error(form, lit("bad quote syntax: ~s"), form, nao);
   return second(form);
 }