* lisp.h (struct Lisp_Bool_Vector.size): EMACS_INT, not EMACS_UINT.

We prefer signed types, and the value cannot exceed the EMACS_INT
range anyway (because otherwise the length would not be representable).

diff --git a/src/ChangeLog b/src/ChangeLog
index 63c4597f5c0b6da61f35ba660789f58dd4afd59d..04e8aeef8480b7ee363c97f8a9045ba5e4a6d549 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -3,6 +3,9 @@
        * lisp.h (union Lisp_Object.i): EMACS_INT, not EMACS_UINT.
        This is for consistency with the ordinary, non-USE_LISP_UNION_TYPE,
        implementation.
+       (struct Lisp_Bool_Vector.size): EMACS_INT, not EMACS_UINT.
+       We prefer signed types, and the value cannot exceed the EMACS_INT
+       range anyway (because otherwise the length would not be representable).
 
        * indent.c (sane_tab_width): New function.
        (current_column, scan_for_column, Findent_to, position_indentation)

diff --git a/src/lisp.h b/src/lisp.h
index 7c9275e6078ad7463b8791bbdac21e4a6492e403..108712a7894a31ee3168826b585e1af58ac136c9 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1013,7 +1013,7 @@ struct Lisp_Bool_Vector
        just the subtype information.  */
     struct vectorlike_header header;
     /* This is the size in bits.  */
-    EMACS_UINT size;
+    EMACS_INT size;
     /* This contains the actual bits, packed into bytes.  */
     unsigned char data[1];
   };