emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/src/syntax.h [emacs-unicode-2]


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/src/syntax.h [emacs-unicode-2]
Date: Mon, 28 Jun 2004 03:55:32 -0400

Index: emacs/src/syntax.h
diff -c emacs/src/syntax.h:1.39.6.2 emacs/src/syntax.h:1.39.6.3
*** emacs/src/syntax.h:1.39.6.2 Thu Apr  8 11:31:15 2004
--- emacs/src/syntax.h  Mon Jun 28 07:29:24 2004
***************
*** 89,112 ****
  
  #ifdef __GNUC__
  #define SYNTAX(c)                                                     \
!   ({ Lisp_Object temp;                                                        
\
!      temp = SYNTAX_ENTRY (c);                                         \
!      (CONSP (temp)                                                    \
!       ? (enum syntaxcode) (XINT (XCAR (temp)) & 0xff)         \
        : Swhitespace); })
  
  #define SYNTAX_WITH_FLAGS(c)                                          \
!   ({ Lisp_Object temp;                                                        
\
!      temp = SYNTAX_ENTRY (c);                                         \
!      (CONSP (temp)                                                    \
!       ? XINT (XCAR (temp))                                    \
        : (int) Swhitespace); })
  
  #define SYNTAX_MATCH(c)                                                       
\
!   ({ Lisp_Object temp;                                                        
\
!      temp = SYNTAX_ENTRY (c);                                         \
!      (CONSP (temp)                                                    \
!       ? XCDR (temp)                                           \
        : Qnil); })
  #else
  extern Lisp_Object syntax_temp;
--- 89,112 ----
  
  #ifdef __GNUC__
  #define SYNTAX(c)                                                     \
!   ({ Lisp_Object _syntax_temp;                                                
\
!      _syntax_temp = SYNTAX_ENTRY (c);                                 \
!      (CONSP (_syntax_temp)                                            \
!       ? (enum syntaxcode) (XINT (XCAR (_syntax_temp)) & 0xff)         \
        : Swhitespace); })
  
  #define SYNTAX_WITH_FLAGS(c)                                          \
!   ({ Lisp_Object _syntax_temp;                                                
\
!      _syntax_temp = SYNTAX_ENTRY (c);                                 \
!      (CONSP (_syntax_temp)                                            \
!       ? XINT (XCAR (_syntax_temp))                                    \
        : (int) Swhitespace); })
  
  #define SYNTAX_MATCH(c)                                                       
\
!   ({ Lisp_Object _syntax_temp;                                                
\
!      _syntax_temp = SYNTAX_ENTRY (c);                                 \
!      (CONSP (_syntax_temp)                                            \
!       ? XCDR (_syntax_temp)                                           \
        : Qnil); })
  #else
  extern Lisp_Object syntax_temp;




reply via email to

[Prev in Thread] Current Thread [Next in Thread]