[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/intervals.h
From: |
Kim F . Storm |
Subject: |
[Emacs-diffs] Changes to emacs/src/intervals.h |
Date: |
Tue, 09 Nov 2004 08:29:44 -0500 |
Index: emacs/src/intervals.h
diff -c emacs/src/intervals.h:1.56 emacs/src/intervals.h:1.57
*** emacs/src/intervals.h:1.56 Sun Nov 30 17:12:40 2003
--- emacs/src/intervals.h Tue Nov 9 13:23:42 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));
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/src/intervals.h,
Kim F . Storm <=