aboutsummaryrefslogtreecommitdiffstats
path: root/src/xterm.h
diff options
context:
space:
mode:
authorPaul Eggert2018-09-06 19:17:14 -0700
committerPaul Eggert2018-09-06 23:56:13 -0700
commit2c8520e19c0fe72d046033e39953b7a0a87be24e (patch)
tree2ea12495ed8184e87108e17632ecd8c2ab02c8cf /src/xterm.h
parentbca35315e16cb53415649e5c0ac2ec0cc1368679 (diff)
downloademacs-2c8520e19c0fe72d046033e39953b7a0a87be24e.tar.gz
emacs-2c8520e19c0fe72d046033e39953b7a0a87be24e.zip
Shrink pseudovectors a bit
sizeof (struct Lisp_Marker) was 32 on x86, where 24 would do. Problem noted by Stefan Monnier in: https://lists.gnu.org/r/emacs-devel/2018-09/msg00165.html * src/bignum.h (struct Lisp_Bignum): * src/frame.h (struct frame): * src/lisp.h (struct Lisp_Vector, struct Lisp_Bool_Vector) (struct Lisp_Char_Table, struct Lisp_Hash_Table) (struct Lisp_Marker, struct Lisp_Overlay) (struct Lisp_Misc_Ptr, struct Lisp_User_Ptr) (struct Lisp_Finalizer, struct Lisp_Float) (struct Lisp_Module_Function): * src/process.h (struct Lisp_Process): * src/termhooks.h (struct terminal): * src/thread.h (struct thread_state, struct Lisp_Mutex) (struct Lisp_CondVar): * src/window.c (struct save_window_data): * src/window.h (struct window): * src/xterm.h (struct scroll_bar): * src/xwidget.h (struct xwidget, struct xwidget_view): Add GCALIGNED_STRUCT attribute. * src/lisp.h (GCALIGNED_UNION_MEMBER): Renamed from GCALIGNED_UNION. All uses changed. (GCALIGNED_STRUCT_MEMBER, GCALIGNED_STRUCT, GCALIGNED): New macros. All uses of open-coded GCALIGNED changed to use GCALIGNED. (union vectorlike_header): No longer GC-aligned. (PSEUDOVECSIZE): Yield 0 for pseudovectors without Lisp objects that place a member before where the first Lisp object member would be.
Diffstat (limited to 'src/xterm.h')
-rw-r--r--src/xterm.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/xterm.h b/src/xterm.h
index 1849a5c9535..2ea8a93f8c1 100644
--- a/src/xterm.h
+++ b/src/xterm.h
@@ -937,7 +937,7 @@ struct scroll_bar
937 937
938 /* True if the scroll bar is horizontal. */ 938 /* True if the scroll bar is horizontal. */
939 bool horizontal; 939 bool horizontal;
940}; 940} GCALIGNED_STRUCT;
941 941
942/* Turning a lisp vector value into a pointer to a struct scroll_bar. */ 942/* Turning a lisp vector value into a pointer to a struct scroll_bar. */
943#define XSCROLL_BAR(vec) ((struct scroll_bar *) XVECTOR (vec)) 943#define XSCROLL_BAR(vec) ((struct scroll_bar *) XVECTOR (vec))