Mercurial > hg > xemacs-beta

diff src/casefiddle.c @ 70:131b0175ea99 r20-0b30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-0b30
author cvs
date Mon, 13 Aug 2007 09:02:59 +0200
parents 859a2309aef8
children 85ec50267440
line wrap: on
line diff
--- a/src/casefiddle.c	Mon Aug 13 09:00:04 2007 +0200
+++ b/src/casefiddle.c	Mon Aug 13 09:02:59 2007 +0200
@@ -36,7 +36,8 @@
   REGISTER Emchar c;
   REGISTER Charcount i, len;
   REGISTER int inword = flag == CASE_DOWN;
-  Lisp_Object syntax_table = buf->syntax_table;
+  struct Lisp_Char_Table *syntax_table =
+    XCHAR_TABLE (buf->mirror_syntax_table);
 
   while (1)
     {
@@ -141,7 +142,8 @@
   Bufpos start, end;
   REGISTER Emchar c;
   REGISTER int inword = flag == CASE_DOWN;
-  Lisp_Object syntax_table = buf->syntax_table;
+  struct Lisp_Char_Table *syntax_table =
+    XCHAR_TABLE (buf->mirror_syntax_table);
   int mccount;
 
   if (EQ (b, e))