diff options
| author | Tom Tromey | 2018-07-06 21:56:17 -0600 |
|---|---|---|
| committer | Tom Tromey | 2018-07-12 22:12:27 -0600 |
| commit | 42fe787b0f26c2df682b2797407a669ef8522ccb (patch) | |
| tree | e944fe465e2b65703a8361bc82647faf4f7907f1 /src/msdos.c | |
| parent | 01dbf2a347944497fdcf2ec156f4605020d7ba2a (diff) | |
| download | emacs-42fe787b0f26c2df682b2797407a669ef8522ccb.tar.gz emacs-42fe787b0f26c2df682b2797407a669ef8522ccb.zip | |
Rename integerp->fixnum, etc, in preparation for bignums
* src/json.c, src/keyboard.c, src/keyboard.h, src/keymap.c,
src/kqueue.c, src/lcms.c, src/lisp.h, src/lread.c, src/macros.c,
src/marker.c, src/menu.c, src/minibuf.c, src/msdos.c, src/print.c,
src/process.c, src/profiler.c, src/search.c, src/sound.c,
src/syntax.c, src/sysdep.c, src/term.c, src/terminal.c,
src/textprop.c, src/undo.c, src/w16select.c, src/w32.c,
src/w32console.c, src/w32cygwinx.c, src/w32fns.c, src/w32font.c,
src/w32inevt.c, src/w32proc.c, src/w32select.c, src/w32term.c,
src/w32uniscribe.c, src/widget.c, src/window.c, src/xdisp.c,
src/xfaces.c, src/xfns.c, src/xfont.c, src/xftfont.c, src/xmenu.c,
src/xrdb.c, src/xselect.c, src/xterm.c, src/xwidget.c: Rename
INTEGERP->FIXNUM, make_number->make_fixnum, CHECK_NUMBER->CHECK_FIXNUM,
make_natnum->make_fixed_natum, NUMBERP->FIXED_OR_FLOATP,
NATNUMP->FIXNATP, CHECK_NATNUM->CHECK_FIXNAT.
Diffstat (limited to 'src/msdos.c')
| -rw-r--r-- | src/msdos.c | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/src/msdos.c b/src/msdos.c index 6c0dfa0c46a..4f38b1de7d3 100644 --- a/src/msdos.c +++ b/src/msdos.c | |||
| @@ -223,7 +223,7 @@ them. This happens with wheeled mice on Windows 9X, for example. */) | |||
| 223 | { | 223 | { |
| 224 | int n; | 224 | int n; |
| 225 | 225 | ||
| 226 | CHECK_NUMBER (nbuttons); | 226 | CHECK_FIXNUM (nbuttons); |
| 227 | n = XINT (nbuttons); | 227 | n = XINT (nbuttons); |
| 228 | if (n < 2 || n > 3) | 228 | if (n < 2 || n > 3) |
| 229 | xsignal2 (Qargs_out_of_range, | 229 | xsignal2 (Qargs_out_of_range, |
| @@ -322,8 +322,8 @@ mouse_get_pos (struct frame **f, int insist, Lisp_Object *bar_window, | |||
| 322 | *bar_window = Qnil; | 322 | *bar_window = Qnil; |
| 323 | mouse_get_xy (&ix, &iy); | 323 | mouse_get_xy (&ix, &iy); |
| 324 | *time = event_timestamp (); | 324 | *time = event_timestamp (); |
| 325 | *x = make_number (mouse_last_x = ix); | 325 | *x = make_fixnum (mouse_last_x = ix); |
| 326 | *y = make_number (mouse_last_y = iy); | 326 | *y = make_fixnum (mouse_last_y = iy); |
| 327 | } | 327 | } |
| 328 | 328 | ||
| 329 | static void | 329 | static void |
| @@ -539,7 +539,7 @@ dos_set_window_size (int *rows, int *cols) | |||
| 539 | (video_name, "screen-dimensions-%dx%d", | 539 | (video_name, "screen-dimensions-%dx%d", |
| 540 | *rows, *cols), Qnil)); | 540 | *rows, *cols), Qnil)); |
| 541 | 541 | ||
| 542 | if (INTEGERP (video_mode) | 542 | if (FIXNUMP (video_mode) |
| 543 | && (video_mode_value = XINT (video_mode)) > 0) | 543 | && (video_mode_value = XINT (video_mode)) > 0) |
| 544 | { | 544 | { |
| 545 | regs.x.ax = video_mode_value; | 545 | regs.x.ax = video_mode_value; |
| @@ -742,7 +742,7 @@ IT_set_cursor_type (struct frame *f, Lisp_Object cursor_type) | |||
| 742 | Lisp_Object bar_parms = XCDR (cursor_type); | 742 | Lisp_Object bar_parms = XCDR (cursor_type); |
| 743 | int width; | 743 | int width; |
| 744 | 744 | ||
| 745 | if (INTEGERP (bar_parms)) | 745 | if (FIXNUMP (bar_parms)) |
| 746 | { | 746 | { |
| 747 | /* Feature: negative WIDTH means cursor at the top | 747 | /* Feature: negative WIDTH means cursor at the top |
| 748 | of the character cell, zero means invisible cursor. */ | 748 | of the character cell, zero means invisible cursor. */ |
| @@ -751,8 +751,8 @@ IT_set_cursor_type (struct frame *f, Lisp_Object cursor_type) | |||
| 751 | width); | 751 | width); |
| 752 | } | 752 | } |
| 753 | else if (CONSP (bar_parms) | 753 | else if (CONSP (bar_parms) |
| 754 | && INTEGERP (XCAR (bar_parms)) | 754 | && FIXNUMP (XCAR (bar_parms)) |
| 755 | && INTEGERP (XCDR (bar_parms))) | 755 | && FIXNUMP (XCDR (bar_parms))) |
| 756 | { | 756 | { |
| 757 | int start_line = XINT (XCDR (bar_parms)); | 757 | int start_line = XINT (XCDR (bar_parms)); |
| 758 | 758 | ||
| @@ -1321,7 +1321,7 @@ IT_frame_up_to_date (struct frame *f) | |||
| 1321 | if (EQ (BVAR (b,cursor_type), Qt)) | 1321 | if (EQ (BVAR (b,cursor_type), Qt)) |
| 1322 | new_cursor = frame_desired_cursor; | 1322 | new_cursor = frame_desired_cursor; |
| 1323 | else if (NILP (BVAR (b, cursor_type))) /* nil means no cursor */ | 1323 | else if (NILP (BVAR (b, cursor_type))) /* nil means no cursor */ |
| 1324 | new_cursor = Fcons (Qbar, make_number (0)); | 1324 | new_cursor = Fcons (Qbar, make_fixnum (0)); |
| 1325 | else | 1325 | else |
| 1326 | new_cursor = BVAR (b, cursor_type); | 1326 | new_cursor = BVAR (b, cursor_type); |
| 1327 | } | 1327 | } |
| @@ -1791,7 +1791,7 @@ internal_terminal_init (void) | |||
| 1791 | } | 1791 | } |
| 1792 | 1792 | ||
| 1793 | Vinitial_window_system = Qpc; | 1793 | Vinitial_window_system = Qpc; |
| 1794 | Vwindow_system_version = make_number (27); /* RE Emacs version */ | 1794 | Vwindow_system_version = make_fixnum (27); /* RE Emacs version */ |
| 1795 | tty->terminal->type = output_msdos_raw; | 1795 | tty->terminal->type = output_msdos_raw; |
| 1796 | 1796 | ||
| 1797 | /* If Emacs was dumped on DOS/V machine, forget the stale VRAM | 1797 | /* If Emacs was dumped on DOS/V machine, forget the stale VRAM |
| @@ -2423,11 +2423,11 @@ dos_rawgetc (void) | |||
| 2423 | sc = regs.h.ah; | 2423 | sc = regs.h.ah; |
| 2424 | 2424 | ||
| 2425 | total_doskeys += 2; | 2425 | total_doskeys += 2; |
| 2426 | ASET (recent_doskeys, recent_doskeys_index, make_number (c)); | 2426 | ASET (recent_doskeys, recent_doskeys_index, make_fixnum (c)); |
| 2427 | recent_doskeys_index++; | 2427 | recent_doskeys_index++; |
| 2428 | if (recent_doskeys_index == NUM_RECENT_DOSKEYS) | 2428 | if (recent_doskeys_index == NUM_RECENT_DOSKEYS) |
| 2429 | recent_doskeys_index = 0; | 2429 | recent_doskeys_index = 0; |
| 2430 | ASET (recent_doskeys, recent_doskeys_index, make_number (sc)); | 2430 | ASET (recent_doskeys, recent_doskeys_index, make_fixnum (sc)); |
| 2431 | recent_doskeys_index++; | 2431 | recent_doskeys_index++; |
| 2432 | if (recent_doskeys_index == NUM_RECENT_DOSKEYS) | 2432 | if (recent_doskeys_index == NUM_RECENT_DOSKEYS) |
| 2433 | recent_doskeys_index = 0; | 2433 | recent_doskeys_index = 0; |
| @@ -2609,7 +2609,7 @@ dos_rawgetc (void) | |||
| 2609 | if (code == 0) | 2609 | if (code == 0) |
| 2610 | continue; | 2610 | continue; |
| 2611 | 2611 | ||
| 2612 | if (!hlinfo->mouse_face_hidden && INTEGERP (Vmouse_highlight)) | 2612 | if (!hlinfo->mouse_face_hidden && FIXNUMP (Vmouse_highlight)) |
| 2613 | { | 2613 | { |
| 2614 | clear_mouse_face (hlinfo); | 2614 | clear_mouse_face (hlinfo); |
| 2615 | hlinfo->mouse_face_hidden = 1; | 2615 | hlinfo->mouse_face_hidden = 1; |
| @@ -2718,8 +2718,8 @@ dos_rawgetc (void) | |||
| 2718 | event.code = button_num; | 2718 | event.code = button_num; |
| 2719 | event.modifiers = dos_get_modifiers (0) | 2719 | event.modifiers = dos_get_modifiers (0) |
| 2720 | | (press ? down_modifier : up_modifier); | 2720 | | (press ? down_modifier : up_modifier); |
| 2721 | event.x = make_number (x); | 2721 | event.x = make_fixnum (x); |
| 2722 | event.y = make_number (y); | 2722 | event.y = make_fixnum (y); |
| 2723 | event.frame_or_window = selected_frame; | 2723 | event.frame_or_window = selected_frame; |
| 2724 | event.arg = Qnil; | 2724 | event.arg = Qnil; |
| 2725 | event.timestamp = event_timestamp (); | 2725 | event.timestamp = event_timestamp (); |
| @@ -4196,7 +4196,7 @@ msdos_fatal_signal (int sig) | |||
| 4196 | void | 4196 | void |
| 4197 | syms_of_msdos (void) | 4197 | syms_of_msdos (void) |
| 4198 | { | 4198 | { |
| 4199 | recent_doskeys = Fmake_vector (make_number (NUM_RECENT_DOSKEYS), Qnil); | 4199 | recent_doskeys = Fmake_vector (make_fixnum (NUM_RECENT_DOSKEYS), Qnil); |
| 4200 | staticpro (&recent_doskeys); | 4200 | staticpro (&recent_doskeys); |
| 4201 | 4201 | ||
| 4202 | #ifndef HAVE_X_WINDOWS | 4202 | #ifndef HAVE_X_WINDOWS |
| @@ -4207,7 +4207,7 @@ syms_of_msdos (void) | |||
| 4207 | DEFVAR_LISP ("dos-unsupported-char-glyph", Vdos_unsupported_char_glyph, | 4207 | DEFVAR_LISP ("dos-unsupported-char-glyph", Vdos_unsupported_char_glyph, |
| 4208 | doc: /* Glyph to display instead of chars not supported by current codepage. | 4208 | doc: /* Glyph to display instead of chars not supported by current codepage. |
| 4209 | This variable is used only by MS-DOS terminals. */); | 4209 | This variable is used only by MS-DOS terminals. */); |
| 4210 | Vdos_unsupported_char_glyph = make_number ('\177'); | 4210 | Vdos_unsupported_char_glyph = make_fixnum ('\177'); |
| 4211 | 4211 | ||
| 4212 | #endif | 4212 | #endif |
| 4213 | 4213 | ||