Mercurial > emacs
diff src/intervals.h @ 9142:d67be35351e5
(NULL_INTERVAL_P): Use type test macros.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 27 Sep 1994 03:13:50 +0000 |
parents | 7327513b377b |
children | 3fc246695491 |
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)