aboutsummaryrefslogtreecommitdiffstats
path: root/src/menu.c
diff options
context:
space:
mode:
authorTom Tromey2018-08-07 18:08:53 -0600
committerTom Tromey2018-08-07 18:08:53 -0600
commitd1ec3a0a8e4d7d56ebc1e4fa743130b9974ac6a8 (patch)
tree04c920acf142f686d3cac11080b17a2fb0dfc9af /src/menu.c
parent68ebff23f7057090da260830500cb278f7b886a5 (diff)
downloademacs-d1ec3a0a8e4d7d56ebc1e4fa743130b9974ac6a8.tar.gz
emacs-d1ec3a0a8e4d7d56ebc1e4fa743130b9974ac6a8.zip
More macro renamings for bignum
* src/alloc.c, src/bidi.c, src/buffer.c, src/buffer.h, src/bytecode.c, src/callint.c, src/callproc.c, src/casefiddle.c, src/casetab.c, src/category.c, src/ccl.c, src/character.c, src/character.h, src/charset.c, src/charset.h, src/chartab.c, src/cmds.c, src/coding.c, src/composite.c, src/composite.h, src/data.c, src/dbusbind.c, src/decompress.c, src/dired.c, src/dispextern.h, src/dispnew.c, src/disptab.h, src/doc.c, src/dosfns.c, src/editfns.c, src/emacs-module.c, src/emacs.c, src/eval.c, src/fileio.c, src/floatfns.c, src/fns.c, src/font.c, src/font.h, src/fontset.c, src/frame.c, src/frame.h, src/fringe.c, src/ftcrfont.c, src/ftfont.c, src/gfilenotify.c, src/gnutls.c, src/gtkutil.c, src/image.c, src/indent.c, src/insdel.c, src/intervals.c, src/json.c, src/keyboard.c, 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/syntax.h, src/sysdep.c, src/term.c, src/termhooks.h, src/textprop.c, src/undo.c, src/w32.c, src/w32console.c, src/w32fns.c, src/w32font.c, src/w32inevt.c, src/w32proc.c, src/w32select.c, src/w32term.c, src/w32term.h, src/w32uniscribe.c, src/window.c, src/xdisp.c, src/xfaces.c, src/xfns.c, src/xfont.c, src/xftfont.c, src/xmenu.c, src/xml.c, src/xrdb.c, src/xselect.c, src/xsettings.c, src/xterm.c, src/xwidget.c Rename XINT->XFIXNUM, XFASTINT->XFIXNAT, XUINT->XUFIXNUM.
Diffstat (limited to 'src/menu.c')
-rw-r--r--src/menu.c20
1 files changed, 10 insertions, 10 deletions
diff --git a/src/menu.c b/src/menu.c
index 1d0ba3c258f..eac82017d3e 100644
--- a/src/menu.c
+++ b/src/menu.c
@@ -134,11 +134,11 @@ restore_menu_items (Lisp_Object saved)
134 menu_items_inuse = (! NILP (menu_items) ? Qt : Qnil); 134 menu_items_inuse = (! NILP (menu_items) ? Qt : Qnil);
135 menu_items_allocated = (VECTORP (menu_items) ? ASIZE (menu_items) : 0); 135 menu_items_allocated = (VECTORP (menu_items) ? ASIZE (menu_items) : 0);
136 saved = XCDR (saved); 136 saved = XCDR (saved);
137 menu_items_used = XINT (XCAR (saved)); 137 menu_items_used = XFIXNUM (XCAR (saved));
138 saved = XCDR (saved); 138 saved = XCDR (saved);
139 menu_items_n_panes = XINT (XCAR (saved)); 139 menu_items_n_panes = XFIXNUM (XCAR (saved));
140 saved = XCDR (saved); 140 saved = XCDR (saved);
141 menu_items_submenu_depth = XINT (XCAR (saved)); 141 menu_items_submenu_depth = XFIXNUM (XCAR (saved));
142} 142}
143 143
144/* Push the whole state of menu_items processing onto the specpdl. 144/* Push the whole state of menu_items processing onto the specpdl.
@@ -532,7 +532,7 @@ parse_single_submenu (Lisp_Object item_key, Lisp_Object item_name,
532 USE_SAFE_ALLOCA; 532 USE_SAFE_ALLOCA;
533 533
534 length = Flength (maps); 534 length = Flength (maps);
535 len = XINT (length); 535 len = XFIXNUM (length);
536 536
537 /* Convert the list MAPS into a vector MAPVEC. */ 537 /* Convert the list MAPS into a vector MAPVEC. */
538 SAFE_ALLOCA_LISP (mapvec, len); 538 SAFE_ALLOCA_LISP (mapvec, len);
@@ -1079,7 +1079,7 @@ into menu items. */)
1079 if (!FRAME_LIVE_P (f)) 1079 if (!FRAME_LIVE_P (f))
1080 return Qnil; 1080 return Qnil;
1081 1081
1082 pixel_to_glyph_coords (f, XINT (x), XINT (y), &col, &row, NULL, 1); 1082 pixel_to_glyph_coords (f, XFIXNUM (x), XFIXNUM (y), &col, &row, NULL, 1);
1083 if (0 <= row && row < FRAME_MENU_BAR_LINES (f)) 1083 if (0 <= row && row < FRAME_MENU_BAR_LINES (f))
1084 { 1084 {
1085 Lisp_Object items, item; 1085 Lisp_Object items, item;
@@ -1099,10 +1099,10 @@ into menu items. */)
1099 pos = AREF (items, i + 3); 1099 pos = AREF (items, i + 3);
1100 if (NILP (str)) 1100 if (NILP (str))
1101 return item; 1101 return item;
1102 if (XINT (pos) <= col 1102 if (XFIXNUM (pos) <= col
1103 /* We use <= so the blank between 2 items on a TTY is 1103 /* We use <= so the blank between 2 items on a TTY is
1104 considered part of the previous item. */ 1104 considered part of the previous item. */
1105 && col <= XINT (pos) + menu_item_width (SDATA (str))) 1105 && col <= XFIXNUM (pos) + menu_item_width (SDATA (str)))
1106 { 1106 {
1107 item = AREF (items, i); 1107 item = AREF (items, i);
1108 return item; 1108 return item;
@@ -1268,8 +1268,8 @@ x_popup_menu_1 (Lisp_Object position, Lisp_Object menu)
1268 ? (EMACS_INT) INT_MIN - ypos 1268 ? (EMACS_INT) INT_MIN - ypos
1269 : MOST_NEGATIVE_FIXNUM), 1269 : MOST_NEGATIVE_FIXNUM),
1270 INT_MAX - ypos); 1270 INT_MAX - ypos);
1271 xpos += XINT (x); 1271 xpos += XFIXNUM (x);
1272 ypos += XINT (y); 1272 ypos += XFIXNUM (y);
1273 1273
1274 XSETFRAME (Vmenu_updating_frame, f); 1274 XSETFRAME (Vmenu_updating_frame, f);
1275 } 1275 }
@@ -1309,7 +1309,7 @@ x_popup_menu_1 (Lisp_Object position, Lisp_Object menu)
1309 else if (CONSP (menu) && KEYMAPP (XCAR (menu))) 1309 else if (CONSP (menu) && KEYMAPP (XCAR (menu)))
1310 { 1310 {
1311 /* We were given a list of keymaps. */ 1311 /* We were given a list of keymaps. */
1312 EMACS_INT nmaps = XFASTINT (Flength (menu)); 1312 EMACS_INT nmaps = XFIXNAT (Flength (menu));
1313 Lisp_Object *maps; 1313 Lisp_Object *maps;
1314 ptrdiff_t i; 1314 ptrdiff_t i;
1315 USE_SAFE_ALLOCA; 1315 USE_SAFE_ALLOCA;