andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; * src/fns.c (Fcopy_alist): More accurate error type

Browse source
This commit is contained in:
Mattias Engdegård 2022-09-25 17:44:29 +02:00
parent e0565e3896
commit 197afa4de3
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/fns.c
View file

@ -1415,9 +1415,9 @@ are shared, however.
Elements of ALIST that are not conses are also shared. */)
(Lisp_Object alist)
{
CHECK_LIST (alist);
if (NILP (alist))
return alist;
CHECK_CONS (alist);
alist = Fcopy_sequence (alist);
for (Lisp_Object tem = alist; !NILP (tem); tem = XCDR (tem))
{