aboutsummaryrefslogtreecommitdiffstats
path: root/src/pgtkterm.c
diff options
context:
space:
mode:
authorVibhav Pant2023-06-06 19:30:27 +0530
committerVibhav Pant2023-06-06 19:30:27 +0530
commit49ffcbf86a32a8a217538d4df3736fe069ccf35d (patch)
treea5f16157cc20fb19a844473a6fbd2b434f4c8260 /src/pgtkterm.c
parentaf569fa3d90a717983b743eb97adbf869c6d1736 (diff)
parent7ca1d782f5910d0c3978c6798a45c6854ec668c7 (diff)
downloademacs-49ffcbf86a32a8a217538d4df3736fe069ccf35d.tar.gz
emacs-49ffcbf86a32a8a217538d4df3736fe069ccf35d.zip
Merge branch 'master' into scratch/comp-static-data
Diffstat (limited to 'src/pgtkterm.c')
-rw-r--r--src/pgtkterm.c33
1 files changed, 18 insertions, 15 deletions
diff --git a/src/pgtkterm.c b/src/pgtkterm.c
index c00e13550bd..91e4d828f51 100644
--- a/src/pgtkterm.c
+++ b/src/pgtkterm.c
@@ -376,6 +376,13 @@ mark_pgtkterm (void)
376 for (i = 0; i < n; i++) 376 for (i = 0; i < n; i++)
377 { 377 {
378 union buffered_input_event *ev = &evq->q[i]; 378 union buffered_input_event *ev = &evq->q[i];
379
380 /* Selection requests don't have Lisp object members. */
381
382 if (ev->ie.kind == SELECTION_REQUEST_EVENT
383 || ev->ie.kind == SELECTION_CLEAR_EVENT)
384 continue;
385
379 mark_object (ev->ie.x); 386 mark_object (ev->ie.x);
380 mark_object (ev->ie.y); 387 mark_object (ev->ie.y);
381 mark_object (ev->ie.frame_or_window); 388 mark_object (ev->ie.frame_or_window);
@@ -4954,22 +4961,19 @@ pgtk_clear_under_internal_border (struct frame *f)
4954 4961
4955 if (face) 4962 if (face)
4956 { 4963 {
4957#define x_fill_rectangle(f, gc, x, y, w, h) \ 4964 fill_background_by_face (f, face, 0, margin, width, border);
4958 fill_background_by_face (f, face, x, y, w, h) 4965 fill_background_by_face (f, face, 0, 0, border, height);
4959 x_fill_rectangle (f, gc, 0, margin, width, border); 4966 fill_background_by_face (f, face, width - border, 0, border,
4960 x_fill_rectangle (f, gc, 0, 0, border, height); 4967 height);
4961 x_fill_rectangle (f, gc, width - border, 0, border, height); 4968 fill_background_by_face (f, face, 0, height - border, width,
4962 x_fill_rectangle (f, gc, 0, height - border, width, border); 4969 border);
4963#undef x_fill_rectangle
4964 } 4970 }
4965 else 4971 else
4966 { 4972 {
4967#define x_clear_area(f, x, y, w, h) pgtk_clear_area (f, x, y, w, h) 4973 pgtk_clear_area (f, 0, 0, border, height);
4968 x_clear_area (f, 0, 0, border, height); 4974 pgtk_clear_area (f, 0, margin, width, border);
4969 x_clear_area (f, 0, margin, width, border); 4975 pgtk_clear_area (f, width - border, 0, border, height);
4970 x_clear_area (f, width - border, 0, border, height); 4976 pgtk_clear_area (f, 0, height - border, width, border);
4971 x_clear_area (f, 0, height - border, width, border);
4972#undef x_clear_area
4973 } 4977 }
4974 4978
4975 unblock_input (); 4979 unblock_input ();
@@ -6835,8 +6839,7 @@ pgtk_term_init (Lisp_Object display_name, char *resource_name)
6835 6839
6836 Lisp_Object system_name = Fsystem_name (); 6840 Lisp_Object system_name = Fsystem_name ();
6837 ptrdiff_t nbytes; 6841 ptrdiff_t nbytes;
6838 if (INT_ADD_WRAPV (SBYTES (Vinvocation_name), SBYTES (system_name) + 2, 6842 if (ckd_add (&nbytes, SBYTES (Vinvocation_name), SBYTES (system_name) + 2))
6839 &nbytes))
6840 memory_full (SIZE_MAX); 6843 memory_full (SIZE_MAX);
6841 dpyinfo->x_id = ++x_display_id; 6844 dpyinfo->x_id = ++x_display_id;
6842 dpyinfo->x_id_name = xmalloc (nbytes); 6845 dpyinfo->x_id_name = xmalloc (nbytes);