diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-08-22 13:45:41 +0300 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2006-08-22 14:07:13 +0000 |
| commit | 8a722a808f014b250085459c05169292bb4903ff (patch) | |
| tree | d040c38223b4e51c0850e2c2a16ddadc6a7b11d6 /ext/Math | |
| parent | 606fd33d334f8edd9f204342f82ec81c3bb776b1 (diff) | |
| download | perl-8a722a808f014b250085459c05169292bb4903ff.tar.gz | |
g++: fix Digest::MD5, Math::BigInt::FastCalc, ODBM_File, XS::APItest (and Time::HiRes 1.88 in CPAN)
Message-Id: <200608220745.k7M7jfjP050939@kosh.hut.fi>
...plus various version bumps and Digest::MD5 test file fixes.
p4raw-id: //depot/perl@28744
Diffstat (limited to 'ext/Math')
| -rw-r--r-- | ext/Math/BigInt/FastCalc/FastCalc.pm | 2 | ||||
| -rw-r--r-- | ext/Math/BigInt/FastCalc/FastCalc.xs | 6 |
2 files changed, 4 insertions, 4 deletions
diff --git a/ext/Math/BigInt/FastCalc/FastCalc.pm b/ext/Math/BigInt/FastCalc/FastCalc.pm index e904e04033..cda5b7cc69 100644 --- a/ext/Math/BigInt/FastCalc/FastCalc.pm +++ b/ext/Math/BigInt/FastCalc/FastCalc.pm @@ -11,7 +11,7 @@ use vars qw/@ISA $VERSION $BASE $BASE_LEN/; @ISA = qw(DynaLoader); -$VERSION = '0.10'; +$VERSION = '0.10_01'; bootstrap Math::BigInt::FastCalc $VERSION; diff --git a/ext/Math/BigInt/FastCalc/FastCalc.xs b/ext/Math/BigInt/FastCalc/FastCalc.xs index 658996279a..f99017154f 100644 --- a/ext/Math/BigInt/FastCalc/FastCalc.xs +++ b/ext/Math/BigInt/FastCalc/FastCalc.xs @@ -388,15 +388,15 @@ _len(class,x) INIT: AV* a; SV* temp; - NV elems; + IV elems; STRLEN len; CODE: a = (AV*)SvRV(x); /* ref to aray, don't check ref */ - elems = (NV) av_len(a); /* number of elems in array */ + elems = av_len(a); /* number of elems in array */ temp = *av_fetch(a, elems, 0); /* fetch last element */ SvPV(temp, len); /* convert to string & store length */ - len += XS_BASE_LEN * elems; + len += (IV) XS_BASE_LEN * elems; ST(0) = newSViv(len); ############################################################################## |