summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMartin Rudalics <rudalics@gmx.at>2014-09-25 09:01:35 +0200
committerMartin Rudalics <rudalics@gmx.at>2014-09-25 09:01:35 +0200
commit340e4cce7aaa1de72d384e4889f0f8aa65025874 (patch)
treee7d176a1736129a32d195a2f763661e32dece05e
parent2494447b719e8d50eee6fc04b83b44b957b67957 (diff)
downloademacs-340e4cce7aaa1de72d384e4889f0f8aa65025874.tar.gz
Remove code left dead after 2014-07-27 changes.
* frame.c (frame_inhibit_resize): * widget.c (EmacsFrameResize): * window.c (resize_frame_windows, Fset_window_configuration): * xdisp.c (expose_frame): * xfns.c (x_change_tool_bar_height): * xmenu.c (update_frame_menubar): * xterm.c (handle_one_xevent, x_new_font, x_set_window_size_1): Remove code left dead after 2014-07-27 changes.
-rw-r--r--src/ChangeLog11
-rw-r--r--src/frame.c15
-rw-r--r--src/widget.c9
-rw-r--r--src/window.c416
-rw-r--r--src/xdisp.c2
-rw-r--r--src/xfns.c2
-rw-r--r--src/xmenu.c8
-rw-r--r--src/xterm.c26
8 files changed, 12 insertions, 477 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 74576709ffa..e6805691ecb 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,14 @@
+2014-09-25 Martin Rudalics <rudalics@gmx.at>
+
+ * frame.c (frame_inhibit_resize):
+ * widget.c (EmacsFrameResize):
+ * window.c (resize_frame_windows, Fset_window_configuration):
+ * xdisp.c (expose_frame):
+ * xfns.c (x_change_tool_bar_height):
+ * xmenu.c (update_frame_menubar):
+ * xterm.c (handle_one_xevent, x_new_font, x_set_window_size_1):
+ Remove code left dead after 2014-07-27 changes.
+
2014-09-25 Paul Eggert <eggert@cs.ucla.edu>
Fix local_cons etc. to not exhaust the stack when in a loop.
diff --git a/src/frame.c b/src/frame.c
index 75bb7e45105..f1d8662aff1 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -219,21 +219,6 @@ frame_inhibit_resize (struct frame *f, bool horizontal)
|| FRAME_TERMCAP_P (f) || FRAME_MSDOS_P (f));
}
-#if 0
-bool
-frame_inhibit_resize (struct frame *f, bool horizontal)
-{
- Lisp_Object fullscreen = get_frame_param (f, Qfullscreen);
-
- return (frame_inhibit_implied_resize
- || EQ (fullscreen, Qfullboth)
- || EQ (fullscreen, Qfullscreen)
- || EQ (fullscreen, Qmaximized)
- || (horizontal && EQ (fullscreen, Qfullwidth))
- || (!horizontal && EQ (fullscreen, Qfullheight)));
-}
-#endif
-
static void
set_menu_bar_lines (struct frame *f, Lisp_Object value, Lisp_Object oldval)
{
diff --git a/src/widget.c b/src/widget.c
index b5b76bb306b..baa6a2ab917 100644
--- a/src/widget.c
+++ b/src/widget.c
@@ -579,15 +579,6 @@ EmacsFrameResize (Widget widget)
if (true || frame_resize_pixelwise)
{
int width, height;
-/** int width = (ew->core.width **/
-/** - FRAME_SCROLL_BAR_AREA_WIDTH (f) **/
-/** - FRAME_TOTAL_FRINGE_WIDTH (f) **/
-/** - 2 * FRAME_INTERNAL_BORDER_WIDTH (f)); **/
-
-/** int height = (ew->core.height **/
-/** - FRAME_TOOLBAR_HEIGHT (f) **/
-/** - FRAME_SCROLL_BAR_AREA_HEIGHT (f) **/
-/** - 2 * FRAME_INTERNAL_BORDER_WIDTH (f)); **/
pixel_to_text_size (ew, ew->core.width, ew->core.height, &width, &height);
change_frame_size (f, width, height, 0, 1, 0, 1);
diff --git a/src/window.c b/src/window.c
index ce651abdda9..f05ea561263 100644
--- a/src/window.c
+++ b/src/window.c
@@ -4163,7 +4163,6 @@ resize_frame_windows (struct frame *f, int size, bool horflag, bool pixelwise)
new_pixel_size = max (horflag
? size
: (size
-/** - FRAME_TOP_MARGIN_HEIGHT (f) **/
- ((FRAME_HAS_MINIBUF_P (f)
&& !FRAME_MINIBUF_ONLY_P (f))
? FRAME_LINE_HEIGHT (f) : 0)),
@@ -4175,7 +4174,6 @@ resize_frame_windows (struct frame *f, int size, bool horflag, bool pixelwise)
new_size = max (horflag
? size
: (size
-/** - FRAME_TOP_MARGIN (f) **/
- ((FRAME_HAS_MINIBUF_P (f)
&& !FRAME_MINIBUF_ONLY_P (f))
? 1 : 0)),
@@ -6462,420 +6460,6 @@ the return value is nil. Otherwise the value is t. */)
}
-#if 0
-DEFUN ("set-window-configuration", Fset_window_configuration,
- Sset_window_configuration, 1, 1, 0,
- doc: /* Set the configuration of windows and buffers as specified by CONFIGURATION.
-CONFIGURATION must be a value previously returned
-by `current-window-configuration' (which see).
-If CONFIGURATION was made from a frame that is now deleted,
-only frame-independent values can be restored. In this case,
-the return value is nil. Otherwise the value is t. */)
- (Lisp_Object configuration)
-{
- register struct save_window_data *data;
- struct Lisp_Vector *saved_windows;
- Lisp_Object new_current_buffer;
- Lisp_Object frame;
- struct frame *f;
- ptrdiff_t old_point = -1;
-
- CHECK_WINDOW_CONFIGURATION (configuration);
-
- data = (struct save_window_data *) XVECTOR (configuration);
- saved_windows = XVECTOR (data->saved_windows);
-
- new_current_buffer = data->current_buffer;
- if (!BUFFER_LIVE_P (XBUFFER (new_current_buffer)))
- new_current_buffer = Qnil;
- else
- {
- if (XBUFFER (new_current_buffer) == current_buffer)
- /* The code further down "preserves point" by saving here PT in
- old_point and then setting it later back into PT. When the
- current-selected-window and the final-selected-window both show
- the current buffer, this suffers from the problem that the
- current PT is the window-point of the current-selected-window,
- while the final PT is the point of the final-selected-window, so
- this copy from one PT to the other would end up moving the
- window-point of the final-selected-window to the window-point of
- the current-selected-window. So we have to be careful which
- point of the current-buffer we copy into old_point. */
- if (EQ (XWINDOW (data->current_window)->contents, new_current_buffer)
- && WINDOWP (selected_window)
- && EQ (XWINDOW (selected_window)->contents, new_current_buffer)
- && !EQ (selected_window, data->current_window))
- old_point = marker_position (XWINDOW (data->current_window)->pointm);
- else
- old_point = PT;
- else
- /* BUF_PT (XBUFFER (new_current_buffer)) gives us the position of
- point in new_current_buffer as of the last time this buffer was
- used. This can be non-deterministic since it can be changed by
- things like jit-lock by mere temporary selection of some random
- window that happens to show this buffer.
- So if possible we want this arbitrary choice of "which point" to
- be the one from the to-be-selected-window so as to prevent this
- window's cursor from being copied from another window. */
- if (EQ (XWINDOW (data->current_window)->contents, new_current_buffer)
- /* If current_window = selected_window, its point is in BUF_PT. */
- && !EQ (selected_window, data->current_window))
- old_point = marker_position (XWINDOW (data->current_window)->pointm);
- else
- old_point = BUF_PT (XBUFFER (new_current_buffer));
- }
-
- frame = XWINDOW (SAVED_WINDOW_N (saved_windows, 0)->window)->frame;
- f = XFRAME (frame);
-
- /* If f is a dead frame, don't bother rebuilding its window tree.
- However, there is other stuff we should still try to do below. */
- if (FRAME_LIVE_P (f))
- {
- Lisp_Object window;
- Lisp_Object dead_windows = Qnil;
- register Lisp_Object tem, par, pers;
- register struct window *w;
- register struct saved_window *p;
- struct window *root_window;
- struct window **leaf_windows;
- int n_leaf_windows;
- ptrdiff_t k;
- int i, n;
- ptrdiff_t count = SPECPDL_INDEX ();
- /* If the frame has been resized since this window configuration was
- made, we change the frame to the size specified in the
- configuration, restore the configuration, and then resize it
- back. We keep track of the prevailing height in these variables. */
- int previous_frame_text_height = FRAME_TEXT_HEIGHT (f);
- int previous_frame_text_width = FRAME_TEXT_WIDTH (f);
- /* int previous_frame_menu_bar_height = FRAME_MENU_BAR_HEIGHT (f); */
- /* int previous_frame_tool_bar_height = FRAME_TOOL_BAR_HEIGHT (f); */
- /* int previous_frame_lines = FRAME_LINES (f); */
- /* int previous_frame_cols = FRAME_COLS (f); */
- int previous_frame_menu_bar_lines = FRAME_MENU_BAR_LINES (f);
- int previous_frame_tool_bar_lines = FRAME_TOOL_BAR_LINES (f);
-
- /* Don't do this within the main loop below: This may call Lisp
- code and is thus potentially unsafe while input is blocked. */
- for (k = 0; k < saved_windows->header.size; k++)
- {
- p = SAVED_WINDOW_N (saved_windows, k);
- window = p->window;
- w = XWINDOW (window);
- if (BUFFERP (w->contents)
- && !EQ (w->contents, p->buffer)
- && BUFFER_LIVE_P (XBUFFER (p->buffer)))
- /* If a window we restore gets another buffer, record the
- window's old buffer. */
- call1 (Qrecord_window_buffer, window);
- }
-
- /* Consider frame unofficial, temporarily. */
- f->official = false;
- /* The mouse highlighting code could get screwed up
- if it runs during this. */
- block_input ();
-
- if (data->frame_text_width != previous_frame_text_width
- || data->frame_text_height != previous_frame_text_height)
- /* Make frame size fit the one in data, so window sizes restored
- from data match those of the frame. */
- adjust_frame_size (f, data->frame_text_width,
- data->frame_text_height, 5, 0);
-
- if (data->frame_menu_bar_lines != previous_frame_menu_bar_lines)
- {
-#ifdef HAVE_WINDOW_SYSTEM
- if (FRAME_WINDOW_P (f))
- x_set_menu_bar_lines (f, make_number (data->frame_menu_bar_lines),
- make_number (0));
- else /* TTY or MSDOS */
-#endif
- set_menu_bar_lines (f, make_number (data->frame_menu_bar_lines),
- make_number (0));
- }
-#ifdef HAVE_WINDOW_SYSTEM
- if (data->frame_tool_bar_lines != previous_frame_tool_bar_lines)
- x_set_tool_bar_lines (f, make_number (data->frame_tool_bar_lines),
- make_number (0));
-#endif
-
- /* "Swap out" point from the selected window's buffer
- into the window itself. (Normally the pointm of the selected
- window holds garbage.) We do this now, before
- restoring the window contents, and prevent it from
- being done later on when we select a new window. */
- if (! NILP (XWINDOW (selected_window)->contents))
- {
- w = XWINDOW (selected_window);
- set_marker_both (w->pointm,
- w->contents,
- BUF_PT (XBUFFER (w->contents)),
- BUF_PT_BYTE (XBUFFER (w->contents)));
- }
-
- fset_redisplay (f);
- FRAME_WINDOW_SIZES_CHANGED (f) = 1;
-
- /* Problem: Freeing all matrices and later allocating them again
- is a serious redisplay flickering problem. What we would
- really like to do is to free only those matrices not reused
- below. */
- root_window = XWINDOW (FRAME_ROOT_WINDOW (f));
- leaf_windows = alloca (count_windows (root_window)
- * sizeof *leaf_windows);
- n_leaf_windows = get_leaf_windows (root_window, leaf_windows, 0);
-
- /* Kludge Alert!
- Mark all windows now on frame as "deleted".
- Restoring the new configuration "undeletes" any that are in it.
-
- Save their current buffers in their height fields, since we may
- need it later, if a buffer saved in the configuration is now
- dead. */
- delete_all_child_windows (FRAME_ROOT_WINDOW (f));
-
- for (k = 0; k < saved_windows->header.size; k++)
- {
- p = SAVED_WINDOW_N (saved_windows, k);
- window = p->window;
- w = XWINDOW (window);
- wset_next (w, Qnil);
-
- if (!NILP (p->parent))
- wset_parent
- (w, SAVED_WINDOW_N (saved_windows, XFASTINT (p->parent))->window);
- else
- wset_parent (w, Qnil);
-
- if (!NILP (p->prev))
- {
- wset_prev
- (w, SAVED_WINDOW_N (saved_windows, XFASTINT (p->prev))->window);
- wset_next (XWINDOW (w->prev), p->window);
- }
- else
- {
- wset_prev (w, Qnil);
- if (!NILP (w->parent))
- wset_combination (XWINDOW (w->parent),
- (XINT (p->total_cols)
- != XWINDOW (w->parent)->total_cols),
- p->window);
- }
-
- /* If we squirreled away the buffer, restore it now. */
- if (BUFFERP (w->combination_limit))
- wset_buffer (w, w->combination_limit);
- w->pixel_left = XFASTINT (p->pixel_left);
- w->pixel_top = XFASTINT (p->pixel_top);
- w->pixel_width = XFASTINT (p->pixel_width);
- w->pixel_height = XFASTINT (p->pixel_height);
- w->left_col = XFASTINT (p->left_col);
- w->top_line = XFASTINT (p->top_line);
- w->total_cols = XFASTINT (p->total_cols);
- w->total_lines = XFASTINT (p->total_lines);
- wset_normal_cols (w, p->normal_cols);
- wset_normal_lines (w, p->normal_lines);
- w->hscroll = XFASTINT (p->hscroll);
- w->suspend_auto_hscroll = !NILP (p->suspend_auto_hscroll);
- w->min_hscroll = XFASTINT (p->min_hscroll);
- w->hscroll_whole = XFASTINT (p->hscroll_whole);
- wset_display_table (w, p->display_table);
- w->left_margin_cols = XINT (p->left_margin_cols);
- w->right_margin_cols = XINT (p->right_margin_cols);
- w->left_fringe_width = XINT (p->left_fringe_width);
- w->right_fringe_width = XINT (p->right_fringe_width);
- w->fringes_outside_margins = !NILP (p->fringes_outside_margins);
- w->scroll_bar_width = XINT (p->scroll_bar_width);
- w->scroll_bar_height = XINT (p->scroll_bar_height);
- wset_vertical_scroll_bar_type (w, p->vertical_scroll_bar_type);
- wset_horizontal_scroll_bar_type (w, p->horizontal_scroll_bar_type);
- wset_dedicated (w, p->dedicated);
- wset_combination_limit (w, p->combination_limit);
- /* Restore any window parameters that have been saved.
- Parameters that have not been saved are left alone. */
- for (tem = p->window_parameters; CONSP (tem); tem = XCDR (tem))
- {
- pers = XCAR (tem);
- if (CONSP (pers))
- {
- if (NILP (XCDR (pers)))
- {
- par = Fassq (XCAR (pers), w->window_parameters);
- if (CONSP (par) && !NILP (XCDR (par)))
- /* Reset a parameter to nil if and only if it
- has a non-nil association. Don't make new
- associations. */
- Fsetcdr (par, Qnil);
- }
- else
- /* Always restore a non-nil value. */
- Fset_window_parameter (window, XCAR (pers), XCDR (pers));
- }
- }
-
- if (BUFFERP (p->buffer) && BUFFER_LIVE_P (XBUFFER (p->buffer)))
- /* If saved buffer is alive, install it. */
- {
- wset_buffer (w, p->buffer);
- w->start_at_line_beg = !NILP (p->start_at_line_beg);
- set_marker_restricted (w->start, p->start, w->contents);
- set_marker_restricted (w->pointm, p->pointm, w->contents);
- set_marker_restricted (w->old_pointm, p->old_pointm, w->contents);
- /* As documented in Fcurrent_window_configuration, don't
- restore the location of point in the buffer which was
- current when the window configuration was recorded. */
- if (!EQ (p->buffer, new_current_buffer)
- && XBUFFER (p->buffer) == current_buffer)
- Fgoto_char (w->pointm);
- }
- else if (BUFFERP (w->contents) && BUFFER_LIVE_P (XBUFFER (w->contents)))
- /* Keep window's old buffer; make sure the markers are real. */
- {
- /* Set window markers at start of visible range. */
- if (XMARKER (w->start)->buffer == 0)
- set_marker_restricted_both (w->start, w->contents, 0, 0);
- if (XMARKER (w->pointm)->buffer == 0)
- set_marker_restricted_both
- (w->pointm, w->contents,
- BUF_PT (XBUFFER (w->contents)),
- BUF_PT_BYTE (XBUFFER (w->contents)));
- if (XMARKER (w->old_pointm)->buffer == 0)
- set_marker_restricted_both
- (w->old_pointm, w->contents,
- BUF_PT (XBUFFER (w->contents)),
- BUF_PT_BYTE (XBUFFER (w->contents)));
- w->start_at_line_beg = 1;
- }
- else if (!NILP (w->start))
- /* Leaf window has no live buffer, get one. */
- {
- /* Get the buffer via other_buffer_safely in order to
- avoid showing an unimportant buffer and, if necessary, to
- recreate *scratch* in the course (part of Juanma's bs-show
- scenario from March 2011). */
- wset_buffer (w, other_buffer_safely (Fcurrent_buffer ()));
- /* This will set the markers to beginning of visible
- range. */
- set_marker_restricted_both (w->start, w->contents, 0, 0);
- set_marker_restricted_both (w->pointm, w->contents, 0, 0);
- set_marker_restricted_both (w->old_pointm, w->contents, 0, 0);
- w->start_at_line_beg = 1;
- if (!NILP (w->dedicated))
- /* Record this window as dead. */
- dead_windows = Fcons (window, dead_windows);
- /* Make sure window is no more dedicated. */
- wset_dedicated (w, Qnil);
- }
- }
-
- fset_root_window (f, data->root_window);
- /* Arrange *not* to restore point in the buffer that was
- current when the window configuration was saved. */
- if (EQ (XWINDOW (data->current_window)->contents, new_current_buffer))
- set_marker_restricted (XWINDOW (data->current_window)->pointm,
- make_number (old_point),
- XWINDOW (data->current_window)->contents);
-
- /* In the following call to `select-window', prevent "swapping out
- point" in the old selected window using the buffer that has
- been restored into it. We already swapped out that point from
- that window's old buffer.
-
- Do not record the buffer here. We do that in a separate call
- to select_window below. See also Bug#16207. */
- select_window (data->current_window, Qt, 1);
- BVAR (XBUFFER (XWINDOW (selected_window)->contents),
- last_selected_window)
- = selected_window;
-
- if (NILP (data->focus_frame)
- || (FRAMEP (data->focus_frame)
- && FRAME_LIVE_P (XFRAME (data->focus_frame))))
- Fredirect_frame_focus (frame, data->focus_frame);
-
- /* Set the frame size to the value it had before this function. */
- if (previous_frame_text_width != FRAME_TEXT_WIDTH (f)
- || previous_frame_text_height != FRAME_TEXT_HEIGHT (f))
- adjust_frame_size (f, previous_frame_text_width,
- previous_frame_text_height, 5, 0);
-
- if (previous_frame_menu_bar_lines != FRAME_MENU_BAR_LINES (f))
- {
-#ifdef HAVE_WINDOW_SYSTEM
- if (FRAME_WINDOW_P (f))
- x_set_menu_bar_lines (f,
- make_number (previous_frame_menu_bar_lines),
- make_number (0));
- else /* TTY or MSDOS */
-#endif
- set_menu_bar_lines (f, make_number (previous_frame_menu_bar_lines),
- make_number (0));
- }
-#ifdef HAVE_WINDOW_SYSTEM
- if (previous_frame_tool_bar_lines != FRAME_TOOL_BAR_LINES (f))
- x_set_tool_bar_lines (f, make_number (previous_frame_tool_bar_lines),
- make_number (0));
-#endif
-
- /* Now, free glyph matrices in windows that were not reused. */
- for (i = n = 0; i < n_leaf_windows; ++i)
- {
- if (NILP (leaf_windows[i]->contents))
- free_window_matrices (leaf_windows[i]);
- else if (EQ (leaf_windows[i]->contents, new_current_buffer))
- ++n;
- }
-
- /* Make frame official again and apply frame size changes if
- needed. */
- f->official = true;
- adjust_frame_size (f, -1, -1, 1, 0);
-
- adjust_frame_glyphs (f);
- unblock_input ();
-
- /* Scan dead buffer windows. */
- for (; CONSP (dead_windows); dead_windows = XCDR (dead_windows))
- {
- window = XCAR (dead_windows);
- if (WINDOW_LIVE_P (window) && !EQ (window, FRAME_ROOT_WINDOW (f)))
- delete_deletable_window (window);
- }
-
- /* Record the selected window's buffer here. The window should
- already be the selected one from the call above. */
- select_window (data->current_window, Qnil, 0);
-
- /* Fselect_window will have made f the selected frame, so we
- reselect the proper frame here. Fhandle_switch_frame will change the
- selected window too, but that doesn't make the call to
- Fselect_window above totally superfluous; it still sets f's
- selected window. */
- if (FRAME_LIVE_P (XFRAME (data->selected_frame)))
- do_switch_frame (data->selected_frame, 0, 0, Qnil);
-
- run_window_configuration_change_hook (f);
- }
-
- if (!NILP (new_current_buffer))
- {
- Fset_buffer (new_current_buffer);
- /* If the new current buffer doesn't appear in the selected
- window, go to its old point (see bug#12208). */
- if (!EQ (XWINDOW (data->current_window)->contents, new_current_buffer))
- Fgoto_char (make_number (old_point));
- }
-
- Vminibuf_scroll_window = data->minibuf_scroll_window;
- minibuf_selected_window = data->minibuf_selected_window;
-
- return (FRAME_LIVE_P (f) ? Qt : Qnil);
-}
-#endif
-
void
restore_window_configuration (Lisp_Object configuration)
{
diff --git a/src/xdisp.c b/src/xdisp.c
index 1ddabf34b9e..3137c8438fe 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -30145,8 +30145,6 @@ expose_frame (struct frame *f, int x, int y, int w, int h)
r.x = r.y = 0;
r.width = FRAME_TEXT_WIDTH (f);
r.height = FRAME_TEXT_HEIGHT (f);
-/** r.width = FRAME_COLUMN_WIDTH (f) * FRAME_COLS (f); **/
-/** r.height = FRAME_LINE_HEIGHT (f) * FRAME_LINES (f); **/
}
else
{
diff --git a/src/xfns.c b/src/xfns.c
index b19e5df5802..9d217cdb4d9 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -1140,10 +1140,8 @@ x_change_tool_bar_height (struct frame *f, int height)
adjust_frame_size (f, -1, -1, 4, 0);
-/** #if !defined USE_X_TOOLKIT **/
if (FRAME_X_WINDOW (f))
x_clear_under_internal_border (f);
-/** #endif **/
#endif /* USE_GTK */
}
diff --git a/src/xmenu.c b/src/xmenu.c
index 8bb8d17369c..e3f1a17fbce 100644
--- a/src/xmenu.c
+++ b/src/xmenu.c
@@ -627,7 +627,6 @@ update_frame_menubar (struct frame *f)
xg_update_frame_menubar (f);
#else
struct x_output *x;
-/** int columns, rows; **/
eassert (FRAME_X_P (f));
@@ -637,10 +636,6 @@ update_frame_menubar (struct frame *f)
return;
block_input ();
- /* Save the size of the frame because the pane widget doesn't accept
- to resize itself. So force it. */
-/** columns = FRAME_COLS (f); **/
-/** rows = FRAME_LINES (f); **/
/* Do the voodoo which means "I'm changing lots of things, don't try
to refigure sizes until I'm done." */
@@ -661,8 +656,7 @@ update_frame_menubar (struct frame *f)
XtManageChild (x->edit_widget);
lw_refigure_widget (x->column_widget, True);
- /* Force the pane widget to resize itself with the right values. */
-/** EmacsFrameSetCharSize (x->edit_widget, columns, rows); **/
+ /* Force the pane widget to resize itself. */
adjust_frame_size (f, FRAME_TEXT_WIDTH (f), FRAME_TEXT_HEIGHT (f), 2, 0);
unblock_input ();
#endif
diff --git a/src/xterm.c b/src/xterm.c
index 9aea0684927..974e29dfc88 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -7560,9 +7560,6 @@ handle_one_xevent (struct x_display_info *dpyinfo,
SET_FRAME_GARBAGED (f);
cancel_mouse_face (f);
}
-
-/** FRAME_PIXEL_WIDTH (f) = event->xconfigure.width; **/
-/** FRAME_PIXEL_HEIGHT (f) = event->xconfigure.height; **/
#endif /* not USE_GTK */
#endif
@@ -8647,7 +8644,6 @@ x_new_font (struct frame *f, Lisp_Object font_object, int fontset)
FRAME_LINE_HEIGHT (f) = FONT_HEIGHT (font);
#ifndef USE_X_TOOLKIT \
-/** FRAME_TOOL_BAR_HEIGHT (f) = FRAME_TOOL_BAR_LINES (f) * FRAME_LINE_HEIGHT (f); **/
FRAME_MENU_BAR_HEIGHT (f) = FRAME_MENU_BAR_LINES (f) * FRAME_LINE_HEIGHT (f);
#endif
@@ -9490,18 +9486,6 @@ x_set_window_size_1 (struct frame *f, int change_gravity, int width, int height,
{
int pixelwidth, pixelheight;
-/** if (pixelwise) **/
-/** { **/
-/** pixelwidth = FRAME_TEXT_TO_PIXEL_WIDTH (f, width); **/
-/** pixelheight = FRAME_TEXT_TO_PIXEL_HEIGHT (f, height); **/
-/** } **/
-/** else **/
-/** { **/
-/** pixelwidth = FRAME_TEXT_COLS_TO_PIXEL_WIDTH (f, width); **/
-/** pixelheight = FRAME_TEXT_LINES_TO_PIXEL_HEIGHT (f, height); **/
-/** } **/
-
-/** FRAME_TOOL_BAR_HEIGHT (f) = FRAME_TOOLBAR_HEIGHT (f); **/
pixelwidth = (pixelwise
? FRAME_TEXT_TO_PIXEL_WIDTH (f, width)
: FRAME_TEXT_COLS_TO_PIXEL_WIDTH (f, width));
@@ -9509,16 +9493,6 @@ x_set_window_size_1 (struct frame *f, int change_gravity, int width, int height,
? FRAME_TEXT_TO_PIXEL_HEIGHT (f, height)
: FRAME_TEXT_LINES_TO_PIXEL_HEIGHT (f, height)));
-/** pixelwidth = ((pixelwise ? width : (width * FRAME_COLUMN_WIDTH (f))) **/
-/** + FRAME_SCROLL_BAR_AREA_WIDTH (f) **/
-/** + FRAME_TOTAL_FRINGE_WIDTH (f) **/
-/** + 2 * FRAME_INTERNAL_BORDER_WIDTH (f)); **/
-
-/** pixelheight = ((pixelwise ? height : (height * FRAME_LINE_HEIGHT (f))) **/
-/** + FRAME_TOOLBAR_HEIGHT (f) **/
-/** + FRAME_SCROLL_BAR_AREA_HEIGHT (f) **/
-/** + 2 * FRAME_INTERNAL_BORDER_WIDTH (f)); **/
-
if (change_gravity) f->win_gravity = NorthWestGravity;
x_wm_set_size_hint (f, 0, 0);
XResizeWindow (FRAME_X_DISPLAY (f), FRAME_OUTER_WINDOW (f),