Use union for the payload of struct Lisp_Vector.

[gnu-emacs] / src / character.h

diff --git a/src/character.h b/src/character.h
index cb03cb3994784f54a31f943bab76ab146073ba84..d1b781caa53b693b8fe416ae46053204fc54be6b 100644 (file)
--- a/src/character.h
+++ b/src/character.h
@@ -677,7 +677,7 @@ extern Lisp_Object string_escape_byte8 (Lisp_Object);
 
 /* Return a translation table of id number ID.  */
 #define GET_TRANSLATION_TABLE(id) \
-  (XCDR(XVECTOR(Vtranslation_table_vector)->contents[(id)]))
+  (XCDR (XVECTOR (Vtranslation_table_vector)->u.contents[(id)]))
 
 INLINE_HEADER_END