Commit 921baa95 authored by Juanma Barranquero's avatar Juanma Barranquero

(Fdefvar, Fdefconst, Feval, Ffuncall): Follow error conventions.

parent fdd6025e
......@@ -785,7 +785,7 @@ usage: (defvar SYMBOL &optional INITVALUE DOCSTRING) */)
sym = Fcar (args);
tail = Fcdr (args);
if (!NILP (Fcdr (Fcdr (tail))))
error ("too many arguments");
error ("Too many arguments");
tem = Fdefault_boundp (sym);
if (!NILP (tail))
......@@ -845,7 +845,7 @@ usage: (defconst SYMBOL INITVALUE [DOCSTRING]) */)
sym = Fcar (args);
if (!NILP (Fcdr (Fcdr (Fcdr (args)))))
error ("too many arguments");
error ("Too many arguments");
tem = Feval (Fcar (Fcdr (args)));
if (!NILP (Vpurify_flag))
......@@ -2037,7 +2037,7 @@ DEFUN ("eval", Feval, Seval, 1, 1, 0,
if (max_lisp_eval_depth < 100)
max_lisp_eval_depth = 100;
if (lisp_eval_depth > max_lisp_eval_depth)
error ("Lisp nesting exceeds max-lisp-eval-depth");
error ("Lisp nesting exceeds `max-lisp-eval-depth'");
}
original_fun = Fcar (form);
......@@ -2733,7 +2733,7 @@ usage: (funcall FUNCTION &rest ARGUMENTS) */)
if (max_lisp_eval_depth < 100)
max_lisp_eval_depth = 100;
if (lisp_eval_depth > max_lisp_eval_depth)
error ("Lisp nesting exceeds max-lisp-eval-depth");
error ("Lisp nesting exceeds `max-lisp-eval-depth'");
}
backtrace.next = backtrace_list;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment