/[emacs]/emacs/src/category.h
ViewVC logotype

Diff of /emacs/src/category.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.15 by lektu, Tue Feb 4 14:03:11 2003 UTC revision 1.15.6.1 by handa, Mon Sep 8 12:48:09 2003 UTC
# Line 1  Line 1 
1  /* Declarations having to do with Emacs category tables.  /* Declarations having to do with Emacs category tables.
2     Copyright (C) 1995 Electrotechnical Laboratory, JAPAN.     Copyright (C) 1995 Electrotechnical Laboratory, JAPAN.
3       Licensed to the Free Software Foundation.       Licensed to the Free Software Foundation.
4       Copyright (C) 2003
5         National Institute of Advanced Industrial Science and Technology (AIST)
6         Registration Number H13PRO009
7    
8  This file is part of GNU Emacs.  This file is part of GNU Emacs.
9    
# Line 95  extern Lisp_Object _temp_category_set; Line 98  extern Lisp_Object _temp_category_set;
98  #define Vstandard_category_table buffer_defaults.category_table  #define Vstandard_category_table buffer_defaults.category_table
99    
100  /* Return the category set of character C in the current category table.  */  /* Return the category set of character C in the current category table.  */
101  #ifdef __GNUC__  #define CATEGORY_SET(c) char_category_set (c)
 #define CATEGORY_SET(c)                                                      \  
   ({ Lisp_Object table = current_buffer->category_table;                     \  
      Lisp_Object temp;                                                       \  
      if ((c) < CHAR_TABLE_SINGLE_BYTE_SLOTS)                                 \  
        while (NILP (temp = XCHAR_TABLE (table)->contents[(unsigned char) c]) \  
               && NILP (temp = XCHAR_TABLE (table)->defalt))                  \  
          table = XCHAR_TABLE (table)->parent;                                \  
      else                                                                    \  
        temp = Faref (table, make_number (c));                                \  
      temp; })  
 #else  
 #define CATEGORY_SET(c) \  
   Faref (current_buffer->category_table, make_number (c))  
 #endif  
102    
103  /* Return the doc string of CATEGORY in category table TABLE.  */  /* Return the doc string of CATEGORY in category table TABLE.  */
104  #define CATEGORY_DOCSTRING(table, category) \  #define CATEGORY_DOCSTRING(table, category) \

Legend:
Removed from v.1.15  
changed lines
  Added in v.1.15.6.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26