comparison src/lisp-union.h @ 406:b8cc9ab3f761 r21-2-33

Import from CVS: tag r21-2-33
author cvs
date Mon, 13 Aug 2007 11:17:09 +0200
parents 2f8bb876ab1d
children 697ef44129c6
comparison
equal deleted inserted replaced
405:0e08f63c74d2 406:b8cc9ab3f761
28 28
29 typedef 29 typedef
30 union Lisp_Object 30 union Lisp_Object
31 { 31 {
32 /* if non-valbits are at lower addresses */ 32 /* if non-valbits are at lower addresses */
33 #if defined(WORDS_BIGENDIAN) 33 #ifdef WORDS_BIGENDIAN
34 struct 34 struct
35 { 35 {
36 EMACS_UINT val : VALBITS; 36 EMACS_UINT val : VALBITS;
37 enum_field (Lisp_Type) type : GCTYPEBITS; 37 enum_field (Lisp_Type) type : GCTYPEBITS;
38 } gu; 38 } gu;