Mercurial > hg > xemacs-beta

diff src/mule.c @ 272:c5d627a313b1 r21-0b34

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b34
author cvs
date Mon, 13 Aug 2007 10:28:48 +0200
parents 3d6bfa290dbd
children 74fd4e045ea6
line wrap: on
line diff
--- a/src/mule.c	Mon Aug 13 10:27:41 2007 +0200
+++ b/src/mule.c	Mon Aug 13 10:28:48 2007 +0200
@@ -48,7 +48,7 @@
     error ("Too complicated regular expression for word!");
   for (i = 0; i < len; i++)
     {
-      temp =XCONS (pattern)->car;
+      temp = XCAR (pattern);
       CHECK_VECTOR (temp);
       CHECK_STRING (XVECTOR_DATA (temp)[0]);
       s = XSTRING (XVECTOR_DATA (temp)[0]);
@@ -80,7 +80,7 @@
       wordbuf[i]->syntax = 0;
       wordbuf[i]->not_bol = wordbuf[i]->not_eol = 0;
 #endif /* EMACS19_REGEXP */
-      pattern = XCONS (pattern)->cdr;
+      pattern = XCDR (pattern);
     }
   for (; i < MAXWORDBUF && wordbuf[i]; i++)
     {