1 files changed, 1 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c
index 959adea6467..9daae92e55a 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -831,6 +831,7 @@ usage: (defconst SYMBOL INITVALUE [DOCSTRING])  */)
  Lisp_Object sym, tem;
  sym = XCAR (args);
+  CHECK_SYMBOL (sym);
  Lisp_Object docstring = Qnil;
  if (!NILP (XCDR (XCDR (args))))
    {

diff --git a/src/eval.c b/src/eval.c index 959adea6467..9daae92e55a 100644 --- a/src/eval.c +++ b/src/eval.c
@@ -831,6 +831,7 @@ usage: (defconst SYMBOL INITVALUE [DOCSTRING]) */)
831	Lisp_Object sym, tem;	831	Lisp_Object sym, tem;
832		832
833	sym = XCAR (args);	833	sym = XCAR (args);
		834	CHECK_SYMBOL (sym);
834	Lisp_Object docstring = Qnil;	835	Lisp_Object docstring = Qnil;
835	if (!NILP (XCDR (XCDR (args))))	836	if (!NILP (XCDR (XCDR (args))))
836	{	837	{