Mercurial > emacs
diff src/lisp.h @ 18115:06ce39d8e93e
(VALMASK, GCTYPEMASK, MARKBIT, ARRAY_MARK_FLAG)
(PSEUDOVECTOR_FLAG, enum pvec_type, PSEUDOVECTOR_SIZE_MASK):
Define regardless of NO_UNION_TYPE.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 02 Jun 1997 02:34:00 +0000 |
parents | 4bd5e5e3db42 |
children | 614b916ff5bf |
line wrap: on
line diff
--- 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,