Mercurial > emacs
diff src/w32fns.c @ 51211:28ea05de2dc5
Make (many) trivial substitutions for renamed and
new macros in dispextern.h, frame.h and window.h.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Sat, 24 May 2003 22:09:34 +0000 |
parents | 174f757a8504 |
children | 0dbfd1fe2e91 |
line wrap: on
line diff
--- a/src/w32fns.c Sat May 24 22:09:13 2003 +0000 +++ b/src/w32fns.c Sat May 24 22:09:34 2003 +0000 @@ -655,8 +655,8 @@ ClientToScreen (FRAME_W32_WINDOW(f), &pt); /* Remember x_pixels_diff and y_pixels_diff. */ - f->output_data.w32->x_pixels_diff = pt.x - rect.left; - f->output_data.w32->y_pixels_diff = pt.y - rect.top; + f->x_pixels_diff = pt.x - rect.left; + f->y_pixels_diff = pt.y - rect.top; *xptr = pt.x; *yptr = pt.y; @@ -1769,7 +1769,7 @@ f->output_data.w32->border_pixel = pix; - if (FRAME_W32_WINDOW (f) != 0 && f->output_data.w32->border_width > 0) + if (FRAME_W32_WINDOW (f) != 0 && f->border_width > 0) { if (FRAME_VISIBLE_P (f)) redraw_frame (f); @@ -1918,7 +1918,7 @@ /* Adjust the frame size so that the client (text) dimensions remain the same. This depends on FRAME_EXTERNAL_MENU_BAR being set correctly. */ - x_set_window_size (f, 0, FRAME_WIDTH (f), FRAME_HEIGHT (f)); + x_set_window_size (f, 0, FRAME_COLS (f), FRAME_LINES (f)); do_pending_window_change (0); } adjust_glyphs (f); @@ -1956,7 +1956,7 @@ /* Don't resize the tool-bar to more than we have room for. */ root_window = FRAME_ROOT_WINDOW (f); - root_height = XINT (XWINDOW (root_window)->height); + root_height = WINDOW_TOTAL_LINES (XWINDOW (root_window)); if (root_height - delta < 1) { delta = root_height - 1; @@ -1987,8 +1987,8 @@ if (delta < 0) { int height = FRAME_INTERNAL_BORDER_WIDTH (f); - int width = PIXEL_WIDTH (f); - int y = nlines * CANON_Y_UNIT (f); + int width = FRAME_PIXEL_WIDTH (f); + int y = nlines * FRAME_LINE_HEIGHT (f); BLOCK_INPUT; { @@ -2134,11 +2134,11 @@ void x_set_scroll_bar_default_width (f) struct frame *f; { - int wid = FONT_WIDTH (f->output_data.w32->font); - - FRAME_SCROLL_BAR_PIXEL_WIDTH (f) = GetSystemMetrics (SM_CXVSCROLL); - FRAME_SCROLL_BAR_COLS (f) = (FRAME_SCROLL_BAR_PIXEL_WIDTH (f) + - wid - 1) / wid; + int wid = FRAME_COLUMN_WIDTH (f); + + FRAME_CONFIG_SCROLL_BAR_WIDTH (f) = GetSystemMetrics (SM_CXVSCROLL); + FRAME_CONFIG_SCROLL_BAR_COLS (f) = (FRAME_CONFIG_SCROLL_BAR_WIDTH (f) + + wid - 1) / wid; } @@ -2231,8 +2231,8 @@ RECT rect; rect.left = rect.top = 0; - rect.right = PIXEL_WIDTH (f); - rect.bottom = PIXEL_HEIGHT (f); + rect.right = FRAME_PIXEL_WIDTH (f); + rect.bottom = FRAME_PIXEL_HEIGHT (f); AdjustWindowRect (&rect, f->output_data.w32->dwStyle, FRAME_EXTERNAL_MENU_BAR (f)); @@ -2248,8 +2248,8 @@ = CreateWindow (EMACS_CLASS, f->namebuf, f->output_data.w32->dwStyle | WS_CLIPCHILDREN, - f->output_data.w32->left_pos, - f->output_data.w32->top_pos, + f->left_pos, + f->top_pos, rect.right - rect.left, rect.bottom - rect.top, NULL, @@ -2259,10 +2259,10 @@ if (hwnd) { - SetWindowLong (hwnd, WND_FONTWIDTH_INDEX, FONT_WIDTH (f->output_data.w32->font)); - SetWindowLong (hwnd, WND_LINEHEIGHT_INDEX, f->output_data.w32->line_height); - SetWindowLong (hwnd, WND_BORDER_INDEX, f->output_data.w32->internal_border_width); - SetWindowLong (hwnd, WND_SCROLLBAR_INDEX, f->output_data.w32->vertical_scroll_bar_extra); + SetWindowLong (hwnd, WND_FONTWIDTH_INDEX, FRAME_COLUMN_WIDTH (f)); + SetWindowLong (hwnd, WND_LINEHEIGHT_INDEX, FRAME_LINE_HEIGHT (f)); + SetWindowLong (hwnd, WND_BORDER_INDEX, FRAME_INTERNAL_BORDER_WIDTH (f)); + SetWindowLong (hwnd, WND_SCROLLBAR_INDEX, f->scroll_bar_actual_width); SetWindowLong (hwnd, WND_BACKGROUND_INDEX, FRAME_BACKGROUND_PIXEL (f)); /* Enable drag-n-drop. */ @@ -4014,8 +4014,8 @@ RECT rect; rect.left = rect.top = 0; - rect.right = PIXEL_WIDTH (f); - rect.bottom = PIXEL_HEIGHT (f); + rect.right = FRAME_PIXEL_WIDTH (f); + rect.bottom = FRAME_PIXEL_HEIGHT (f); AdjustWindowRect (&rect, f->output_data.w32->dwStyle, FRAME_EXTERNAL_MENU_BAR (f)); @@ -4024,8 +4024,8 @@ = CreateWindow (EMACS_CLASS, f->namebuf, f->output_data.w32->dwStyle, - f->output_data.w32->left_pos, - f->output_data.w32->top_pos, + f->left_pos, + f->top_pos, rect.right - rect.left, rect.bottom - rect.top, FRAME_W32_WINDOW (SELECTED_FRAME ()), /* owner */ @@ -4035,9 +4035,9 @@ if (tip_window) { - SetWindowLong (tip_window, WND_FONTWIDTH_INDEX, FONT_WIDTH (f->output_data.w32->font)); - SetWindowLong (tip_window, WND_LINEHEIGHT_INDEX, f->output_data.w32->line_height); - SetWindowLong (tip_window, WND_BORDER_INDEX, f->output_data.w32->internal_border_width); + SetWindowLong (tip_window, WND_FONTWIDTH_INDEX, FRAME_COLUMN_WIDTH (f)); + SetWindowLong (tip_window, WND_LINEHEIGHT_INDEX, FRAME_LINE_HEIGHT (f)); + SetWindowLong (tip_window, WND_BORDER_INDEX, FRAME_INTERNAL_BORDER_WIDTH (f)); SetWindowLong (tip_window, WND_BACKGROUND_INDEX, FRAME_BACKGROUND_PIXEL (f)); /* Tip frames have no scrollbars. */ @@ -4154,7 +4154,7 @@ Note that many default values are used. */ /* Normal video */ - gc_values.font = f->output_data.w32->font; + gc_values.font = FRAME_FONT (f); /* Cursor has cursor-color background, background-color foreground. */ gc_values.foreground = FRAME_BACKGROUND_PIXEL (f); @@ -4286,7 +4286,7 @@ FRAME_CAN_HAVE_SCROLL_BARS (f) = 1; /* By default, make scrollbars the system standard width. */ - f->scroll_bar_pixel_width = GetSystemMetrics (SM_CXVSCROLL); + FRAME_CONFIG_SCROLL_BAR_WIDTH (f) = GetSystemMetrics (SM_CXVSCROLL); f->output_method = output_w32; f->output_data.w32 = @@ -4466,14 +4466,14 @@ x_default_parameter (f, parms, Qscroll_bar_width, Qnil, "scrollBarWidth", "ScrollBarWidth", RES_TYPE_NUMBER); - /* Dimensions, especially f->height, must be done via change_frame_size. + /* Dimensions, especially FRAME_LINES (f), must be done via change_frame_size. Change will not be effected unless different from the current - f->height. */ - width = f->width; - height = f->height; - - f->height = 0; - SET_FRAME_WIDTH (f, 0); + FRAME_LINES (f). */ + width = FRAME_COLS (f); + height = FRAME_LINES (f); + + FRAME_LINES (f) = 0; + SET_FRAME_COLS (f, 0); change_frame_size (f, height, width, 1, 0, 0); /* Tell the server what size and position, etc, we want, and how @@ -6658,28 +6658,28 @@ x_pixel_width (f) register struct frame *f; { - return PIXEL_WIDTH (f); + return FRAME_PIXEL_WIDTH (f); } int x_pixel_height (f) register struct frame *f; { - return PIXEL_HEIGHT (f); + return FRAME_PIXEL_HEIGHT (f); } int x_char_width (f) register struct frame *f; { - return FONT_WIDTH (f->output_data.w32->font); + return FRAME_COLUMN_WIDTH (f); } int x_char_height (f) register struct frame *f; { - return f->output_data.w32->line_height; + return FRAME_LINE_HEIGHT (f); } int @@ -7244,8 +7244,8 @@ int height = img->height + 2 * img->vmargin; if (NILP (pixels)) - size = Fcons (make_float ((double) width / CANON_X_UNIT (f)), - make_float ((double) height / CANON_Y_UNIT (f))); + size = Fcons (make_float ((double) width / FRAME_COLUMN_WIDTH (f)), + make_float ((double) height / FRAME_LINE_HEIGHT (f))); else size = Fcons (make_number (width), make_number (height)); } @@ -12731,7 +12731,7 @@ XSETFRAME (frame, f); buffer = Fget_buffer_create (build_string (" *tip*")); - Fset_window_buffer (FRAME_ROOT_WINDOW (f), buffer); + Fset_window_buffer (FRAME_ROOT_WINDOW (f), buffer, Qnil); old_buffer = current_buffer; set_buffer_internal_1 (XBUFFER (buffer)); current_buffer->truncate_lines = Qnil; @@ -12858,10 +12858,9 @@ window_prompting = x_figure_window_size (f, parms, 0); /* No fringes on tip frame. */ - f->output_data.w32->fringes_extra = 0; - f->output_data.w32->fringe_cols = 0; - f->output_data.w32->left_fringe_width = 0; - f->output_data.w32->right_fringe_width = 0; + f->fringe_cols = 0; + f->left_fringe_width = 0; + f->right_fringe_width = 0; BLOCK_INPUT; my_create_tip_window (f); @@ -12876,13 +12875,13 @@ x_default_parameter (f, parms, Qcursor_type, Qbox, "cursorType", "CursorType", RES_TYPE_SYMBOL); - /* Dimensions, especially f->height, must be done via change_frame_size. + /* Dimensions, especially FRAME_LINES (f), must be done via change_frame_size. Change will not be effected unless different from the current - f->height. */ - width = f->width; - height = f->height; - f->height = 0; - SET_FRAME_WIDTH (f, 0); + FRAME_LINES (f). */ + width = FRAME_COLS (f); + height = FRAME_LINES (f); + FRAME_LINES (f) = 0; + SET_FRAME_COLS (f, 0); change_frame_size (f, height, width, 1, 0, 0); /* Add `tooltip' frame parameter's default value. */ @@ -13071,8 +13070,8 @@ } BLOCK_INPUT; - compute_tip_xy (f, parms, dx, dy, PIXEL_WIDTH (f), - PIXEL_HEIGHT (f), &root_x, &root_y); + compute_tip_xy (f, parms, dx, dy, FRAME_PIXEL_WIDTH (f), + FRAME_PIXEL_HEIGHT (f), &root_x, &root_y); /* Put tooltip in topmost group and in position. */ SetWindowPos (FRAME_W32_WINDOW (f), HWND_TOPMOST, @@ -13120,7 +13119,7 @@ /* Set up the frame's root window. */ w = XWINDOW (FRAME_ROOT_WINDOW (f)); - w->left = w->top = make_number (0); + w->left_col = w->top_line = make_number (0); if (CONSP (Vx_max_tooltip_size) && INTEGERP (XCAR (Vx_max_tooltip_size)) @@ -13128,16 +13127,16 @@ && INTEGERP (XCDR (Vx_max_tooltip_size)) && XINT (XCDR (Vx_max_tooltip_size)) > 0) { - w->width = XCAR (Vx_max_tooltip_size); - w->height = XCDR (Vx_max_tooltip_size); - } - else - { - w->width = make_number (80); - w->height = make_number (40); - } - - f->window_width = XINT (w->width); + w->total_cols = XCAR (Vx_max_tooltip_size); + w->total_lines = XCDR (Vx_max_tooltip_size); + } + else + { + w->total_cols = make_number (80); + w->total_lines = make_number (40); + } + + FRAME_TOTAL_COLS (f) = XINT (w->total_cols); adjust_glyphs (f); w->pseudo_window_p = 1;