Re: lib/Math/BigInt/t/bigintc.t + VMS + perl@16925

-----BEGIN PGP SIGNED MESSAGE-----

Moin,

On 31-May-02 Jarkko Hietaniemi carved into stone:
> On Fri, May 31, 2002 at 05:20:11PM -0500, Craig A. Berry wrote:
>> with a -Duse64bitall configuration on OpenVMS Alpha v7.3, Compaq C 
>> T6.5-003, the test fails due to the following warnings:
>> 
>> ok 88
>> Subroutine Math::BigInt::Calc::_mul redefined at
>> ../lib/Math/BigInt/Calc.pm line 78.
>> Subroutine Math::BigInt::Calc::_div redefined at
>> ../lib/Math/BigInt/Calc.pm line 79.
>> ok 89
>> ok 90
>> ok 91
>> ok 92
>> ok 93
>> Subroutine Math::BigInt::Calc::_mul redefined at
>> ../lib/Math/BigInt/Calc.pm line 84.
>> Subroutine Math::BigInt::Calc::_div redefined at
>> ../lib/Math/BigInt/Calc.pm line 85.
>> ok 94
>> ok 95
> 
> Would this help?
> 
> ==== //depot/perl/lib/Math/BigInt/Calc.pm#19 -
> /u/vieraat/vieraat/jhi/pp4/perl/lib/Math/BigInt/Calc.pm ====
> Index: perl/lib/Math/BigInt/Calc.pm
> --- perl/lib/Math/BigInt/Calc.pm.~1~  Sat Jun  1 01:47:14 2002
> +++ perl/lib/Math/BigInt/Calc.pm      Sat Jun  1 01:47:14 2002
> @@ -72,6 +72,8 @@
>      #print "BASE_LEN: $BASE_LEN MAX_VAL: $MAX_VAL BASE: $BASE RBASE:
> $RBASE ";
>      #print "BASE_LEN_SMALL: $BASE_LEN_SMALL MBASE: $MBASE\n";
>  
> +    undef &_mul;
> +    undef &_div;
>      if ($caught & 1 != 0)
>        {
>        # must USE_MUL
> End of Patch.

This just brushes it under the rug. Something us very wrong, the file
should never get loaded twice (hence the redefinitions).

Cheers,

Tels 

- -- 
 perl -MDev::Bollocks -e'print Dev::Bollocks->rand(),"\n"'
 simultaneously engineer fifth-generation networks

 http://bloodgate.com/perl       My current Perl projects
 PGP key available on http://bloodgate.com/tels.asc or via email

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.0.6 (GNU/Linux)
Comment: When cryptography is outlawed, bayl bhgynjf jvyy unir cevinpl.

iQEVAwUBPPjFIHcLPEOTuEwVAQEJNQf/RWVvZ88nBTXuuOiNOwkI/t0A7YPCEGR5
3/xZSYWQGVyLP5Xs9f0nwxGJjT0O9IA2ALXqF+DJYFALnTSraJ0xhpazDmekqgtI
XiQ2bdY1zEmlgAmwkWJ/ecMb756o5WyYnOsUuIOYhe+73K/Oab92zzI1wCzZdHcK
Gsqh/JjyvFneavz50pt767L/5FKy4F/dLnD27pbibim4LoLtCQr6kMzu4WnFT4yk
KFsMh/Htq3bnfcrUYHvheb+HPULlesj29azyfdfKltc8ooZLCS3ErNDVviGg8N85
YAK7wMA5kaxRKlOdeKNHh3RXsQ/4gqJ/D4jeZNZ/4LDINVSM9pLk+Q==
=Zxfk
-----END PGP SIGNATURE-----

• lib/Math/BigInt/t/bigintc.t + VMS + perl@16925 by Craig A. Berry
• Re: lib/Math/BigInt/t/bigintc.t + VMS + perl@16925 by Jarkko Hietaniemi
• Re: lib/Math/BigInt/t/bigintc.t + VMS + perl@16925 by Tels
• Re: lib/Math/BigInt/t/bigintc.t + VMS + perl@16925 by Craig A. Berry