# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 865218840 0
# Node ID 06ce39d8e93e3beb8fd91841108713e8967f3f93
# Parent  0a684c540f66308466741a0ccd318555e6454e85
(VALMASK, GCTYPEMASK, MARKBIT, ARRAY_MARK_FLAG)
(PSEUDOVECTOR_FLAG, enum pvec_type, PSEUDOVECTOR_SIZE_MASK):
Define regardless of NO_UNION_TYPE.

diff -r 0a684c540f66 -r 06ce39d8e93e src/lisp.h
--- a/src/lisp.h	Mon Jun 02 02:25:15 1997 +0000
+++ b/src/lisp.h	Mon Jun 02 02:34:00 1997 +0000
@@ -181,12 +181,11 @@
 #endif /* NO_UNION_TYPE */
 
 
-/* If union type is not wanted, define Lisp_Object as just a number
-   and define the macros below to extract fields by shifting */
+/* If union type is not wanted, define Lisp_Object as just a number.  */
 
 #ifdef NO_UNION_TYPE
-
 #define Lisp_Object EMACS_INT
+#endif /* NO_UNION_TYPE */
 
 #ifndef VALMASK
 #define VALMASK ((((EMACS_INT) 1)<<VALBITS) - 1)
@@ -243,8 +242,6 @@
 
 /* For convenience, we also store the number of elements in these bits.  */
 #define PSEUDOVECTOR_SIZE_MASK 0x1ff
-
-#endif /* NO_UNION_TYPE */
 
 /* These macros extract various sorts of values from a Lisp_Object.
  For example, if tem is a Lisp_Object whose type is Lisp_Cons,