diff src/lisp.h @ 54083:16821fe4a0bf

(union Lisp_Object): Give a more precise type for `type'. Remove unused `gu' alternative.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 19 Feb 2004 20:24:54 +0000
parents 1b20aa00ebc2
children 2affc700598b 55d4fe5962fd
line wrap: on
line diff
--- a/src/lisp.h	Thu Feb 19 19:36:36 2004 +0000
+++ b/src/lisp.h	Thu Feb 19 20:24:54 2004 +0000
@@ -178,18 +178,13 @@
     struct
       {
 	EMACS_INT val  : VALBITS;
-	EMACS_UINT type : GCTYPEBITS;
+	enum Lisp_Type type : GCTYPEBITS;
       } s;
     struct
       {
 	EMACS_UINT val : VALBITS;
-	EMACS_UINT type : GCTYPEBITS;
+	enum Lisp_Type type : GCTYPEBITS;
       } u;
-    struct
-      {
-	EMACS_UINT val		: VALBITS;
-	enum Lisp_Type type	: GCTYPEBITS;
-      } gu;
   }
 Lisp_Object;
 
@@ -204,19 +199,14 @@
 
     struct
       {
-	EMACS_UINT type : GCTYPEBITS;
+	enum Lisp_Type type : GCTYPEBITS;
 	EMACS_INT val  : VALBITS;
       } s;
     struct
       {
-	EMACS_UINT type : GCTYPEBITS;
+	enum Lisp_Type type : GCTYPEBITS;
 	EMACS_UINT val : VALBITS;
       } u;
-    struct
-      {
-	enum Lisp_Type type	: GCTYPEBITS;
-	EMACS_UINT val		: VALBITS;
-      } gu;
   }
 Lisp_Object;