Mercurial > hg > xemacs-beta
diff src/number.h @ 5865:a45722e74335
Merge.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Thu, 12 Mar 2015 16:27:13 +0000 |
parents | 750fab17b299 |
children |
line wrap: on
line diff
--- a/src/number.h Thu Mar 12 00:59:27 2015 +0000 +++ b/src/number.h Thu Mar 12 16:27:13 2015 +0000 @@ -101,12 +101,18 @@ #if SIZEOF_EMACS_INT == SIZEOF_LONG # define bignum_fits_emacs_int_p(b) bignum_fits_long_p(b) # define bignum_to_emacs_int(b) bignum_to_long(b) +# define bignum_set_emacs_int bignum_set_long +# define make_bignum_emacs_uint(b) make_bignum_un(b) #elif SIZEOF_EMACS_INT == SIZEOF_INT # define bignum_fits_emacs_int_p(b) bignum_fits_int_p(b) # define bignum_to_emacs_int(b) bignum_to_int(b) +# define bignum_set_emacs_int bignum_set_long +# define make_bignum_emacs_uint(b) make_bignum_un(b) #else # define bignum_fits_emacs_int_p(b) bignum_fits_llong_p(b) # define bignum_to_emacs_int(b) bignum_to_llong(b) +# define bignum_set_emacs_int bignum_set_llong +# define make_bignum_emacs_uint(b) make_bignum_ull(b) #endif extern Lisp_Object make_bignum (long);