diff options
| author | Tom Tromey | 2018-08-07 18:08:53 -0600 |
|---|---|---|
| committer | Tom Tromey | 2018-08-07 18:08:53 -0600 |
| commit | d1ec3a0a8e4d7d56ebc1e4fa743130b9974ac6a8 (patch) | |
| tree | 04c920acf142f686d3cac11080b17a2fb0dfc9af /src/emacs-module.c | |
| parent | 68ebff23f7057090da260830500cb278f7b886a5 (diff) | |
| download | emacs-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/emacs-module.c')
| -rw-r--r-- | src/emacs-module.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/emacs-module.c b/src/emacs-module.c index 39150f6f67b..e7ba17426bf 100644 --- a/src/emacs-module.c +++ b/src/emacs-module.c | |||
| @@ -302,7 +302,7 @@ module_make_global_ref (emacs_env *env, emacs_value ref) | |||
| 302 | if (i >= 0) | 302 | if (i >= 0) |
| 303 | { | 303 | { |
| 304 | Lisp_Object value = HASH_VALUE (h, i); | 304 | Lisp_Object value = HASH_VALUE (h, i); |
| 305 | EMACS_INT refcount = XFASTINT (value) + 1; | 305 | EMACS_INT refcount = XFIXNAT (value) + 1; |
| 306 | if (MOST_POSITIVE_FIXNUM < refcount) | 306 | if (MOST_POSITIVE_FIXNUM < refcount) |
| 307 | xsignal0 (Qoverflow_error); | 307 | xsignal0 (Qoverflow_error); |
| 308 | value = make_fixed_natnum (refcount); | 308 | value = make_fixed_natnum (refcount); |
| @@ -329,7 +329,7 @@ module_free_global_ref (emacs_env *env, emacs_value ref) | |||
| 329 | 329 | ||
| 330 | if (i >= 0) | 330 | if (i >= 0) |
| 331 | { | 331 | { |
| 332 | EMACS_INT refcount = XFASTINT (HASH_VALUE (h, i)) - 1; | 332 | EMACS_INT refcount = XFIXNAT (HASH_VALUE (h, i)) - 1; |
| 333 | if (refcount > 0) | 333 | if (refcount > 0) |
| 334 | set_hash_value_slot (h, i, make_fixed_natnum (refcount)); | 334 | set_hash_value_slot (h, i, make_fixed_natnum (refcount)); |
| 335 | else | 335 | else |
| @@ -525,7 +525,7 @@ module_extract_integer (emacs_env *env, emacs_value n) | |||
| 525 | xsignal1 (Qoverflow_error, l); | 525 | xsignal1 (Qoverflow_error, l); |
| 526 | return mpz_get_si (XBIGNUM (l)->value); | 526 | return mpz_get_si (XBIGNUM (l)->value); |
| 527 | } | 527 | } |
| 528 | return XINT (l); | 528 | return XFIXNUM (l); |
| 529 | } | 529 | } |
| 530 | 530 | ||
| 531 | static emacs_value | 531 | static emacs_value |