Mercurial > emacs

diff src/abbrev.c @ 50625:804e6ed7ce2c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fdefine_abbrev_table): Use XCAR, XCDR.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 17 Apr 2003 21:44:50 +0000
parents 23a1cea22d13
children ddaae63bd193
line wrap: on
line diff
--- a/src/abbrev.c	Thu Apr 17 21:21:47 2003 +0000
+++ b/src/abbrev.c	Thu Apr 17 21:44:50 2003 +0000
@@ -592,9 +592,9 @@
     }
   CHECK_VECTOR (table);
 
-  for (; !NILP (definitions); definitions = Fcdr (definitions))
+  for (; CONSP (definitions); definitions = XCDR (definitions))
     {
-      elt = Fcar (definitions);
+      elt = XCAR (definitions);
       name  = Fcar (elt);	elt = Fcdr (elt);
       exp   = Fcar (elt);	elt = Fcdr (elt);
       hook  = Fcar (elt);	elt = Fcdr (elt);