Mercurial > emacs

changeset 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 589192191b6d
children a5a77c7717cb
files src/abbrev.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
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);