diff options
| author | Karl Heuer | 1994-10-04 15:47:28 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-10-04 15:47:28 +0000 |
| commit | a5d8b611ac0c9325e77894719bfd7333fbc38097 (patch) | |
| tree | 810bbdedfc3acff24b383370618ee1acb3952d5d /src | |
| parent | 617b3bfe1b9c7f44963f31f7458f841bdc279a03 (diff) | |
| download | emacs-a5d8b611ac0c9325e77894719bfd7333fbc38097.tar.gz emacs-a5d8b611ac0c9325e77894719bfd7333fbc38097.zip | |
(direct_output_for_insert, direct_output_forward_char, change_frame_size,
Fsleep_for): Don't use XFASTINT as an lvalue.
Diffstat (limited to 'src')
| -rw-r--r-- | src/dispnew.c | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/dispnew.c b/src/dispnew.c index 9f2fbf9c715..c91354bad1a 100644 --- a/src/dispnew.c +++ b/src/dispnew.c | |||
| @@ -1100,9 +1100,9 @@ direct_output_for_insert (g) | |||
| 1100 | } | 1100 | } |
| 1101 | unchanged_modified = MODIFF; | 1101 | unchanged_modified = MODIFF; |
| 1102 | beg_unchanged = GPT - BEG; | 1102 | beg_unchanged = GPT - BEG; |
| 1103 | XFASTINT (w->last_point) = point; | 1103 | XSETFASTINT (w->last_point, point); |
| 1104 | XFASTINT (w->last_point_x) = hpos; | 1104 | XSETFASTINT (w->last_point_x, hpos); |
| 1105 | XFASTINT (w->last_modified) = MODIFF; | 1105 | XSETFASTINT (w->last_modified, MODIFF); |
| 1106 | 1106 | ||
| 1107 | reassert_line_highlight (0, vpos); | 1107 | reassert_line_highlight (0, vpos); |
| 1108 | write_glyphs (¤t_frame->glyphs[vpos][hpos], 1); | 1108 | write_glyphs (¤t_frame->glyphs[vpos][hpos], 1); |
| @@ -1147,14 +1147,14 @@ direct_output_forward_char (n) | |||
| 1147 | /* Don't use direct output next to an invisible character | 1147 | /* Don't use direct output next to an invisible character |
| 1148 | since we might need to do something special. */ | 1148 | since we might need to do something special. */ |
| 1149 | 1149 | ||
| 1150 | XFASTINT (position) = point; | 1150 | XSETFASTINT (position, point); |
| 1151 | if (XFASTINT (position) < ZV | 1151 | if (XFASTINT (position) < ZV |
| 1152 | && ! NILP (Fget_char_property (position, | 1152 | && ! NILP (Fget_char_property (position, |
| 1153 | Qinvisible, | 1153 | Qinvisible, |
| 1154 | selected_window))) | 1154 | selected_window))) |
| 1155 | return 0; | 1155 | return 0; |
| 1156 | 1156 | ||
| 1157 | XFASTINT (position) = point - 1; | 1157 | XSETFASTINT (position, point - 1); |
| 1158 | if (XFASTINT (position) >= BEGV | 1158 | if (XFASTINT (position) >= BEGV |
| 1159 | && ! NILP (Fget_char_property (position, | 1159 | && ! NILP (Fget_char_property (position, |
| 1160 | Qinvisible, | 1160 | Qinvisible, |
| @@ -1163,8 +1163,8 @@ direct_output_forward_char (n) | |||
| 1163 | #endif | 1163 | #endif |
| 1164 | 1164 | ||
| 1165 | FRAME_CURSOR_X (frame) += n; | 1165 | FRAME_CURSOR_X (frame) += n; |
| 1166 | XFASTINT (w->last_point_x) = FRAME_CURSOR_X (frame); | 1166 | XSETFASTINT (w->last_point_x, FRAME_CURSOR_X (frame)); |
| 1167 | XFASTINT (w->last_point) = point; | 1167 | XSETFASTINT (w->last_point, point); |
| 1168 | cursor_to (FRAME_CURSOR_Y (frame), FRAME_CURSOR_X (frame)); | 1168 | cursor_to (FRAME_CURSOR_Y (frame), FRAME_CURSOR_X (frame)); |
| 1169 | fflush (stdout); | 1169 | fflush (stdout); |
| 1170 | 1170 | ||
| @@ -2048,8 +2048,8 @@ change_frame_size (frame, newheight, newwidth, pretend, delay) | |||
| 2048 | /* Frame has both root and minibuffer. */ | 2048 | /* Frame has both root and minibuffer. */ |
| 2049 | set_window_height (FRAME_ROOT_WINDOW (frame), | 2049 | set_window_height (FRAME_ROOT_WINDOW (frame), |
| 2050 | newheight - 1 - FRAME_MENU_BAR_LINES (frame), 0); | 2050 | newheight - 1 - FRAME_MENU_BAR_LINES (frame), 0); |
| 2051 | XFASTINT (XWINDOW (FRAME_MINIBUF_WINDOW (frame))->top) | 2051 | XSETFASTINT (XWINDOW (FRAME_MINIBUF_WINDOW (frame))->top, |
| 2052 | = newheight - 1; | 2052 | newheight - 1); |
| 2053 | set_window_height (FRAME_MINIBUF_WINDOW (frame), 1, 0); | 2053 | set_window_height (FRAME_MINIBUF_WINDOW (frame), 1, 0); |
| 2054 | } | 2054 | } |
| 2055 | else | 2055 | else |
| @@ -2202,7 +2202,7 @@ Emacs was built without floating point support.\n\ | |||
| 2202 | { | 2202 | { |
| 2203 | Lisp_Object zero; | 2203 | Lisp_Object zero; |
| 2204 | 2204 | ||
| 2205 | XFASTINT (zero) = 0; | 2205 | XSETFASTINT (zero, 0); |
| 2206 | wait_reading_process_input (sec, usec, zero, 0); | 2206 | wait_reading_process_input (sec, usec, zero, 0); |
| 2207 | } | 2207 | } |
| 2208 | 2208 | ||