# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 790639373 0
# Node ID 7ffec1b5c86c7880e247f0a7a5022a4fce1947d9
# Parent  70bd087c47a9e8b07d3f28692bb22507da282e37
(union Lisp_Misc): Make the `type' field just 16 bits, to match the
substructures.

diff -r 70bd087c47a9 -r 7ffec1b5c86c src/lisp.h
--- a/src/lisp.h	Fri Jan 20 20:12:25 1995 +0000
+++ b/src/lisp.h	Fri Jan 20 22:02:53 1995 +0000
@@ -677,7 +677,7 @@
 
 union Lisp_Misc
   {
-    enum Lisp_Misc_Type type;
+    int type : 16;
     struct Lisp_Free u_free;
     struct Lisp_Marker u_marker;
     struct Lisp_Intfwd u_intfwd;