aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/frame.c18
1 files changed, 9 insertions, 9 deletions
diff --git a/src/frame.c b/src/frame.c
index 633945409ce..5c6e44e936a 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -197,14 +197,14 @@ make_frame (mini_p)
197 f->width = 10; 197 f->width = 10;
198 f->height = 10; 198 f->height = 10;
199 199
200 XFASTINT (XWINDOW (root_window)->width) = 10; 200 XSETFASTINT (XWINDOW (root_window)->width, 10);
201 XFASTINT (XWINDOW (root_window)->height) = (mini_p ? 9 : 10); 201 XSETFASTINT (XWINDOW (root_window)->height, (mini_p ? 9 : 10));
202 202
203 if (mini_p) 203 if (mini_p)
204 { 204 {
205 XFASTINT (XWINDOW (mini_window)->width) = 10; 205 XSETFASTINT (XWINDOW (mini_window)->width, 10);
206 XFASTINT (XWINDOW (mini_window)->top) = 9; 206 XSETFASTINT (XWINDOW (mini_window)->top, 9);
207 XFASTINT (XWINDOW (mini_window)->height) = 1; 207 XSETFASTINT (XWINDOW (mini_window)->height, 1);
208 } 208 }
209 209
210 /* Choose a buffer for the frame's root window. */ 210 /* Choose a buffer for the frame's root window. */
@@ -233,7 +233,7 @@ make_frame (mini_p)
233 f->selected_window = root_window; 233 f->selected_window = root_window;
234 /* Make sure this window seems more recently used than 234 /* Make sure this window seems more recently used than
235 a newly-created, never-selected window. */ 235 a newly-created, never-selected window. */
236 XFASTINT (XWINDOW (f->selected_window)->use_time) = ++window_select_count; 236 XSETFASTINT (XWINDOW (f->selected_window)->use_time, ++window_select_count);
237 237
238 return f; 238 return f;
239} 239}
@@ -1430,7 +1430,7 @@ If FRAME is omitted, return information on the currently selected frame.")
1430 { 1430 {
1431 /* This ought to be correct in f->param_alist for an X frame. */ 1431 /* This ought to be correct in f->param_alist for an X frame. */
1432 Lisp_Object lines; 1432 Lisp_Object lines;
1433 XFASTINT (lines) = FRAME_MENU_BAR_LINES (f); 1433 XSETFASTINT (lines, FRAME_MENU_BAR_LINES (f));
1434 store_in_alist (&alist, Qmenu_bar_lines, lines); 1434 store_in_alist (&alist, Qmenu_bar_lines, lines);
1435 } 1435 }
1436 return alist; 1436 return alist;
@@ -1856,7 +1856,7 @@ DEFUN ("selected-frame", Fselected_frame, Sselected_frame, 0, 0, 0,
1856 () 1856 ()
1857{ 1857{
1858 Lisp_Object tem; 1858 Lisp_Object tem;
1859 XFASTINT (tem) = 0; 1859 XSETFASTINT (tem, 0);
1860 return tem; 1860 return tem;
1861} 1861}
1862 1862
@@ -2119,7 +2119,7 @@ syms_of_frame ()
2119 2119
2120 DEFVAR_LISP ("terminal-frame", &Vterminal_frame, 2120 DEFVAR_LISP ("terminal-frame", &Vterminal_frame,
2121 "The initial frame-object, which represents Emacs's stdout."); 2121 "The initial frame-object, which represents Emacs's stdout.");
2122 XFASTINT (Vterminal_frame) = 0; 2122 XSETFASTINT (Vterminal_frame, 0);
2123 2123
2124 defsubr (&Sselected_frame); 2124 defsubr (&Sselected_frame);
2125 defsubr (&Sframe_first_window); 2125 defsubr (&Sframe_first_window);