mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-12 23:00:22 +02:00
Code Activity

(INTEGRAL2BIG): WORDS_BIGENDIAN not right for word

Browse source 
order parameter to mpz_import, in fact with just one word there's no
order to worry about at all.
This commit is contained in:
Kevin Ryde 2004-02-18 00:25:39 +00:00
parent 48dc9f349d
commit 29c560674b
1 changed files with 5 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

14
libguile/num2integral.i.c
View file

@ -204,15 +204,11 @@ INTEGRAL2BIG (ITYPE n)
#endif #endif
mpz_import (SCM_I_BIG_MPZ (result), mpz_import (SCM_I_BIG_MPZ (result),
1, 1, /* one word */
#ifdef WORDS_BIGENDIAN 1, /* word order irrelevant when just one word */
1, SIZEOF_ITYPE, /* word size */
#else 0, /* native endianness within word */
-1, 0, /* no nails */
#endif
SIZEOF_ITYPE,
0,
0,
&n); &n);
/* mpz_import doesn't handle sign */ /* mpz_import doesn't handle sign */