Mercurial > emacs
changeset 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 | 0a684c540f66 |
| children | 7839aa2f6765 |
| files | src/lisp.h |
| diffstat | 1 files changed, 2 insertions(+), 5 deletions(-) [+] |
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,