Avoid crashes in 'defconst'
* src/eval.c (Fdefconst): Verify that SYMBOL is a known symbol. (Bug#41817)
This commit is contained in:
committed by
Eli Zaretskii
parent
11e3413cff
commit
368e140660
@@ -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))))
|
||||
{
|
||||
|
||||
Reference in New Issue
Block a user