From 58e04b755a862f9dde91b0293f1998ed26ab73f4 Mon Sep 17 00:00:00 2001 From: matz Date: Thu, 2 Nov 2000 09:04:54 +0000 Subject: matz git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1028 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- bignum.c | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'bignum.c') diff --git a/bignum.c b/bignum.c index 1494db6a8f..e7f84dc6f9 100644 --- a/bignum.c +++ b/bignum.c @@ -20,14 +20,14 @@ VALUE rb_cBignum; #define USHORT _USHORT #endif -#if SIZEOF_LONG*2 <= SIZEOF_LONG_LONG -typedef unsigned long BDIGIT; -typedef unsigned long long BDIGIT_DBL; -typedef long long BDIGIT_DBL_SIGNED; -#elif SIZEOF_INT*2 <= SIZEOF_LONG_LONG +#if SIZEOF_INT*2 <= SIZEOF_LONG_LONG typedef unsigned int BDIGIT; typedef unsigned long long BDIGIT_DBL; typedef long long BDIGIT_DBL_SIGNED; +#elif SIZEOF_INT*2 <= SIZEOF___INT64 +typedef unsigned int BDIGIT; +typedef unsigned __int64 BDIGIT_DBL; +typedef __int64 BDIGIT_DBL_SIGNED; #else typedef unsigned short BDIGIT; typedef unsigned long BDIGIT_DBL; @@ -469,7 +469,7 @@ dbl2big(d) double d; { long i = 0; - long c; + BDIGIT c; BDIGIT *digits; VALUE z; double u = (d < 0)?-d:d; @@ -489,9 +489,9 @@ dbl2big(d) digits = BDIGITS(z); while (i--) { u *= BIGRAD; - c = (long)u; + c = (BDIGIT)u; u -= c; - digits[i] = (BDIGIT)c; + digits[i] = c; } return z; -- cgit v1.2.3