Mercurial > emacs

changeset 9142:d67be35351e5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(NULL_INTERVAL_P): Use type test macros.
author Karl Heuer <kwzh@gnu.org>
date Tue, 27 Sep 1994 03:13:50 +0000
parents e309bb9ccdc0
children 069f8b6cdfe6
files src/intervals.h
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/intervals.h	Tue Sep 27 03:13:08 1994 +0000
+++ b/src/intervals.h	Tue Sep 27 03:13:50 1994 +0000
@@ -36,9 +36,9 @@
 /* True if an interval pointer is null, or is a Lisp_Buffer or
    Lisp_String pointer (meaning it points to the owner of this
    interval tree). */
-#define NULL_INTERVAL_P(i) ((i) == NULL_INTERVAL                       \
-			    || XTYPE ((Lisp_Object)(i)) == Lisp_Buffer \
-			    || XTYPE ((Lisp_Object)(i)) == Lisp_String)
+#define NULL_INTERVAL_P(i) ((i) == NULL_INTERVAL           \
+			    || BUFFERP ((Lisp_Object)(i)) \
+			    || STRINGP ((Lisp_Object)(i)))
 
 /* True if this interval has no right child. */
 #define NULL_RIGHT_CHILD(i) ((i)->right == NULL_INTERVAL)