emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] Changes to emacs/src/intervals.h [lexbind]


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/src/intervals.h [lexbind]
Date: Thu, 11 Nov 2004 23:43:06 -0500

Index: emacs/src/intervals.h
diff -c emacs/src/intervals.h:1.49.2.3 emacs/src/intervals.h:1.49.2.4
*** emacs/src/intervals.h:1.49.2.3      Sun Dec 28 05:19:59 2003
--- emacs/src/intervals.h       Fri Nov 12 04:21:15 2004
***************
*** 84,92 ****
--- 84,97 ----
  #define INT_LISPLIKE(i) (BUFFERP ((Lisp_Object){(EMACS_INT)(i)}) \
                         || STRINGP ((Lisp_Object){(EMACS_INT)(i)}))
  #endif
+ 
+ #ifdef ENABLE_CHECKING
  #define NULL_INTERVAL_P(i) \
     (CHECK (!INT_LISPLIKE (i), "non-interval"), (i) == NULL_INTERVAL)
  /* old #define NULL_INTERVAL_P(i) ((i) == NULL_INTERVAL || INT_LISPLIKE (i)) 
*/
+ #else
+ #define NULL_INTERVAL_P(i) ((i) == NULL_INTERVAL)
+ #endif
  
  /* True if this interval has no right child. */
  #define NULL_RIGHT_CHILD(i) ((i)->right == NULL_INTERVAL)
***************
*** 289,294 ****
--- 294,300 ----
  extern INLINE void copy_intervals_to_string P_ ((Lisp_Object, struct buffer *,
                                                 int, int));
  extern INTERVAL copy_intervals P_ ((INTERVAL, int, int));
+ extern int compare_string_intervals P_ ((Lisp_Object, Lisp_Object));
  extern Lisp_Object textget P_ ((Lisp_Object, Lisp_Object));
  extern Lisp_Object lookup_char_property P_ ((Lisp_Object, Lisp_Object, int));
  extern void move_if_not_intangible P_ ((int));




reply via email to

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