Commit ba273af8 authored by Alessandro Ghedini's avatar Alessandro Ghedini

Imported Upstream version 1.997

parent 6d120cdf
......@@ -1043,6 +1043,22 @@ Math::BigInt:
* Change default backend library from Math::BigInt::FastCalc to
Math::BigInt::Calc, which is included in the Math-BigInt distro. This
avoids recursive distribution dependency (RT #65976) (Peter John Acklam).
2011-09-04 v1.997 pjacklam
* Document actual behaviour of from_xxx() methods. [perl #85334] (Peter John
Acklam)
* Make bmuladd() able to handle third arg properly. [perl #85482] (Peter John
Acklam)
* Add sign function bsgn() as a complement to babs(). (Peter John Acklam)
* Fix objectify()'s handling of "foreign objects". (RT #16221 and #52124)
(Peter John Acklam)
* Rewrap some verbatim pod in Math::BigInt. (Father Chrysostomos)
* Correct links to sections. (Alexandr Ciornii)
* Remove incorrect formatting inside verbatim paragraphs. (Alexandr Ciornii)
* Upgrade bundled modules in "inc" to latest version. (Peter John Acklam)
* Include "^MYMETA\.(yml|json)\z" in MANIFEST.SKIP. Whereas META.* are
generated by the distribution author at packaging time, MYMETA.* are
generated by the end user at configure time after any dynamic dependencies
are known. (Peter John Acklam)
Please send us test-reports, your experiences with this and your ideas - we love
to hear about our work!
......
File mode changed from 100644 to 100755
......@@ -25,7 +25,6 @@ LICENSE
Makefile.PL
MANIFEST This list of files
MANIFEST.SKIP
META.yml
NEW
README
t/00sig.t
......@@ -73,6 +72,7 @@ t/req_mbfn.t
t/req_mbfw.t
t/require.t
t/round.t
t/rt-16221.t
t/sub_ali.t
t/sub_mbf.t
t/sub_mbi.t
......@@ -90,4 +90,6 @@ t/use_lib4.t
t/use_mbfw.t
t/with_sub.t
TODO
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
SIGNATURE Public-key signature (added by MakeMaker)
......@@ -4,7 +4,7 @@
^Makefile\z
^Makefile.(old|bak)\z
^MANIFEST.(old|bak)\z
^MYMETA\.yml\z
^MYMETA\.(yml|json)\z
pm_to_blib
\.git
.*\.patch\z
......
{
"abstract" : "Arbitrary size integer/float math package",
"author" : [
"Original code by Mark Biggar, overloaded interface by Ilya Zakharevich., Tels <nospam-abuse@bloodgate.com>"
],
"dynamic_config" : 1,
"generated_by" : "ExtUtils::MakeMaker version 6.59, CPAN::Meta::Converter version 2.112150",
"license" : [
"perl_5"
],
"meta-spec" : {
"url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
"version" : "2"
},
"name" : "Math-BigInt",
"no_index" : {
"directory" : [
"t",
"inc"
]
},
"prereqs" : {
"build" : {
"requires" : {
"ExtUtils::MakeMaker" : "6.42",
"Test::More" : "0.62"
}
},
"configure" : {
"requires" : {
"ExtUtils::MakeMaker" : 0
}
},
"runtime" : {
"requires" : {
"perl" : "5.006002"
}
}
},
"release_status" : "stable",
"version" : "1.997"
}
---
abstract: 'Arbitrary size integer/float math package'
author:
- 'Original code by Mark Biggar, overloaded interface by Ilya Zakharevich.'
- 'Tels <nospam-abuse@bloodgate.com>'
- 'Original code by Mark Biggar, overloaded interface by Ilya Zakharevich., Tels <nospam-abuse@bloodgate.com>'
build_requires:
ExtUtils::MakeMaker: 6.42
Test::More: 0.62
configure_requires:
ExtUtils::MakeMaker: 6.42
distribution_type: module
generated_by: 'Module::Install version 1.00'
ExtUtils::MakeMaker: 0
dynamic_config: 1
generated_by: 'ExtUtils::MakeMaker version 6.59, CPAN::Meta::Converter version 2.112150'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
......@@ -17,17 +16,8 @@ meta-spec:
name: Math-BigInt
no_index:
directory:
- examples
- inc
- t
recommends:
Math::BigInt::FastCalc: 0.25
Math::BigInt::GMP: 1.35
Math::BigInt::Pari: 1.15
Math::BigRat: 0.2602
bignum: 0.22
- inc
requires:
perl: 5.006002
resources:
license: http://dev.perl.org/licenses/
version: 1.992
version: 1.997
# We need at least Perl 5.6
require 5.006002;
use strict;
......@@ -20,9 +19,9 @@ requires 'perl' => 5.006002;
# upgrading them would make little fluffy kittens much happier:
my @checks;
check_minimum_version ('Math::BigInt::FastCalc' => 0.25);
check_minimum_version ('Math::BigInt::GMP' => 1.35);
check_minimum_version ('Math::BigInt::Pari' => 1.15);
check_minimum_version ('Math::BigInt::FastCalc' => 0.27);
check_minimum_version ('Math::BigInt::GMP' => 1.37);
check_minimum_version ('Math::BigInt::Pari' => 1.16);
check_minimum_version ('Math::BigRat' => 0.2602);
check_minimum_version ('bignum' => 0.22);
......
This file contains message digests of all files listed in MANIFEST,
signed via the Module::Signature module, version 0.66.
signed via the Module::Signature module, version 0.68.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
......@@ -16,16 +16,17 @@ Hash: SHA1
SHA1 f6ef98e8f3f6a4f670d569f279ef5a3c05c16d0c BENCHMARK
SHA1 89a3a97b2a4c5bb8919e51856a35b493cd5f9312 BUGS
SHA1 2414bb0802239c24f6a2ed9787c596921c638642 CHANGES
SHA1 be61886bedb5108610be7c03137c8d06c01b0b3b CHANGES
SHA1 f27c8bd98e754f96c9825fa6ce9f1244c93bdbe6 CREDITS
SHA1 bc2db74538d3acd53f71b5512a144fe18c253ecd GOALS
SHA1 fe61299e80a1dca48fbaa33f0869e3238ec07c70 HISTORY
SHA1 c42565ad26cdf91502bacf19a4f7080e63c51fe2 INSTALL
SHA1 d6a6c30ee6d9ba6b9afab8bbf6a25e1b23c744e0 LICENSE
SHA1 a33c4dc2215b88e7056fe88ca0f2eaa71652ff40 MANIFEST
SHA1 fa2271022ccdfc09bd60e4bfa2683f0487096f02 MANIFEST.SKIP
SHA1 6de3ba298893c49d05fd1f434d8cbad0b6543704 META.yml
SHA1 23376979b4ae0e8d9a36d2d337799e245f73d1f5 Makefile.PL
SHA1 8146d99998bd0e6c7861ab295b530d80e9f7d4c3 MANIFEST
SHA1 9981edbeac4473adbe951034fc97afc2b9bf60a2 MANIFEST.SKIP
SHA1 46ae142386712a790df63bac5cdaeaa2c4fe9960 META.json
SHA1 a9bcc4f98112cc3368473950410f0ae6abf7d669 META.yml
SHA1 ec08721a8e408016e79b6484362f7a8b03b41d7c Makefile.PL
SHA1 2ec9bfda86bb2073e9423e6a86bb6956c06ebb2f NEW
SHA1 481f5827752d2100914db1eaeb60bf0bbd13529e README
SHA1 f1500916b488220b707bc10a0388d7dbcfd52e99 TODO
......@@ -33,18 +34,18 @@ SHA1 c2bbe82659480de8710b9e64a62d47b64dddd2d2 examples/1000.txt
SHA1 fe55e27b4791656d36a6c9548280746de7003be5 examples/bigprimes.pl
SHA1 b57b118469a1a16e54d61206c5bd9077dbb2231a examples/hailstone.pl
SHA1 8ca42793d8769ec8d0928f11c30f38d96dd54efb examples/prime.pl
SHA1 7305dbe2904416e28decb05396988a5d51d578be inc/Module/Install.pm
SHA1 129960509127732258570c122042bc48615222e1 inc/Module/Install/Base.pm
SHA1 cf3356ed9a5bd2f732527ef9e7bc5ef4458c8a93 inc/Module/Install/Can.pm
SHA1 bf0a3e1977effc2832d7a813a76dce3f31b437b6 inc/Module/Install/Fetch.pm
SHA1 b721c93ca5bc9a6aa863b49af15f1b1de6125935 inc/Module/Install/Makefile.pm
SHA1 026cc0551a0ad399d195e395b46bdf842e115192 inc/Module/Install/Metadata.pm
SHA1 5457015ea5a50e93465bf2dafa29feebd547f85b inc/Module/Install/Win32.pm
SHA1 051e7fa8063908befa3440508d0584a2497b97db inc/Module/Install/WriteAll.pm
SHA1 0e857a88d53686b11ce147b61802a6a2d36340ca lib/Math/BigFloat.pm
SHA1 cd04861879676149ccbf7a27f0149cf4f62101ab lib/Math/BigInt.pm
SHA1 c1153cbf42c279a41fba2b5e5c2bdf3a8850e735 lib/Math/BigInt/Calc.pm
SHA1 29813d9612be8ec0ac65dd7eeec5b6f756320229 lib/Math/BigInt/CalcEmu.pm
SHA1 7b4ae50ebac72d20761171c4c2b50c206344ea40 inc/Module/Install.pm
SHA1 d9fe55a427fe2fd75b5029afeeaa61b592e07f79 inc/Module/Install/Base.pm
SHA1 62d3922826d9f89f20c185e7031ac8f028504745 inc/Module/Install/Can.pm
SHA1 dc809f64fb70a26b069a36f8d3d353d520dbb7e1 inc/Module/Install/Fetch.pm
SHA1 73ab91490a628452cc140db72ef9d13a1326d211 inc/Module/Install/Makefile.pm
SHA1 8ce3f2b414e4617e6233dd4ba10830f8c5d672ec inc/Module/Install/Metadata.pm
SHA1 3b0acd2eeac93a0afe48120f5648f0db362e5bbf inc/Module/Install/Win32.pm
SHA1 f08924f051e623f8e09fa6a121993c4a9cf7d9eb inc/Module/Install/WriteAll.pm
SHA1 d9078fbda98ca86682a317481f9a4886d66bf5d0 lib/Math/BigFloat.pm
SHA1 2e06f9606e5155e0d2b532092f211a978422a723 lib/Math/BigInt.pm
SHA1 57296203789f7c32334a1196883fd2d8eb5b2880 lib/Math/BigInt/Calc.pm
SHA1 d0ddfce78d6da2813aec2cac2735cb5a48715b02 lib/Math/BigInt/CalcEmu.pm
SHA1 a2d393f9d265801f8ef022725d03f83b616b2fe1 t/00sig.t
SHA1 32b73052135171974d5c522f0dee665a03dacdbd t/01load.t
SHA1 02ef05af53cb7378452590324bb21dfe61f44069 t/02pod.t
......@@ -56,14 +57,14 @@ SHA1 27c1738a064e7f7bf91c762d411af447847c331c t/Math/BigInt/Subclass.pm
SHA1 a2014803baec5dbef46235f83411f76efa0efea7 t/_e_math.t
SHA1 0e725849a20e80bb1da796a7be40b69a958c8313 t/alias.inc
SHA1 be61650d19d12797f0bd45d64a5dbae68f22f3ad t/bare_mbf.t
SHA1 b25611b9a4c78a20ad285fd2b68025ebfa57b4a9 t/bare_mbi.t
SHA1 fa55cd1412116a4f19c0580c46ce71b642de3831 t/bare_mbi.t
SHA1 97fb1db80aeb4ab007e2260d35329e149edf5e05 t/bare_mif.t
SHA1 333a425247b4e276696210a6322b815a0f55f5ab t/big_pi_e.t
SHA1 03a9a3dde7d4fcc3eb2e8f245ab0b0253f1d5821 t/bigfltpm.inc
SHA1 d05514d6cae3afa4feb983d5467eaf9422aa546c t/bigfltpm.inc
SHA1 a8f364fea5e2993f5ae7bd3f8463024175d33e24 t/bigfltpm.t
SHA1 b3ceebc429c05bce95347575d28348306dbcfcc8 t/bigintc.t
SHA1 108a20412616ea34d67b93891383d47e3a619120 t/bigintpm.inc
SHA1 e91b777f7c22648d8debaf4f663d519decda083b t/bigintpm.t
SHA1 845e7daa3c6b2463a6fdc9218044975801547bb8 t/bigintpm.inc
SHA1 5c7e31a73f1827d08118f96cf31d5d4e792ab8c0 t/bigintpm.t
SHA1 cb07d195c20eb306088eeacccc2c7475f267446c t/bigints.t
SHA1 5bdf82ef7085b97caa496bfc71ab1fbfe48ef9e8 t/biglog.t
SHA1 da260b6e02b220868fc7b4c0f87569299402fbf7 t/bigroot.t
......@@ -90,9 +91,10 @@ SHA1 49d78117c94e7406a63b0825ddee9a7e9fbc6a00 t/req_mbfn.t
SHA1 ef3834f63ddf05286de80b1d7bb1fb420e117183 t/req_mbfw.t
SHA1 1bbe72733abd2f580f94b6a147672f7671260149 t/require.t
SHA1 ad6cc6fe4bb93ae78db4eb7dcb96c95024b963d2 t/round.t
SHA1 8201ea0035861736224992039bcc01d5bd72b778 t/rt-16221.t
SHA1 9d51def046889bf20c6ac2a278f9b3f5f8e36025 t/sub_ali.t
SHA1 26e2d4b13a44eaa38141a7c119a2737ba10ae88d t/sub_mbf.t
SHA1 2359c73586b352db6d7ceb631a0457029ef416c4 t/sub_mbi.t
SHA1 8d56d489b86dbe487378d309e858df04bc17f9ed t/sub_mbi.t
SHA1 a9d994551c5ca127c11f5cdd1d8df1d93972c72c t/sub_mif.t
SHA1 22c563a6879c94ce7c8eb72c645f2e374837c34e t/trap.t
SHA1 9438a430cebc43f4466b3d75662fe7dde577d3c7 t/upgrade.inc
......@@ -109,7 +111,7 @@ SHA1 8e66591a9596ed344c09741a52ee5a54a4142dc6 t/with_sub.t
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.9 (Cygwin)
iEYEARECAAYFAk1pJTEACgkQVQvyyU1bchozxQCdHRkMh4YnXBqQ4a2UFNoy7/ax
OmMAn0qkQfRPM+cM0DxWAacR9T8SMg0d
=vyiu
iEYEARECAAYFAk5jyfsACgkQVQvyyU1bcho3hwCeJAhTBN2Vu3AqJ3wt7b3TGyn1
+NUAoNCUn23+323B5+4YaBtCwTqie9L0
=wjVC
-----END PGP SIGNATURE-----
......@@ -31,7 +31,7 @@ BEGIN {
# This is not enforced yet, but will be some time in the next few
# releases once we can make sure it won't clash with custom
# Module::Install extensions.
$VERSION = '1.00';
$VERSION = '1.01';
# Storage for the pseudo-singleton
$MAIN = undef;
......@@ -467,4 +467,4 @@ sub _CLASS ($) {
1;
# Copyright 2008 - 2010 Adam Kennedy.
# Copyright 2008 - 2011 Adam Kennedy.
......@@ -4,7 +4,7 @@ package Module::Install::Base;
use strict 'vars';
use vars qw{$VERSION};
BEGIN {
$VERSION = '1.00';
$VERSION = '1.01';
}
# Suspend handler for "redefined" warnings
......
......@@ -9,7 +9,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
$VERSION = '1.00';
$VERSION = '1.01';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
......
......@@ -6,7 +6,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
$VERSION = '1.00';
$VERSION = '1.01';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
......
......@@ -8,7 +8,7 @@ use Fcntl qw/:flock :seek/;
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
$VERSION = '1.00';
$VERSION = '1.01';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
......
......@@ -6,7 +6,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
$VERSION = '1.00';
$VERSION = '1.01';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
......@@ -515,6 +515,7 @@ sub __extract_license {
'GNU Free Documentation license' => 'unrestricted', 1,
'GNU Affero General Public License' => 'open_source', 1,
'(?:Free)?BSD license' => 'bsd', 1,
'Artistic license 2\.0' => 'artistic_2', 1,
'Artistic license' => 'artistic', 1,
'Apache (?:Software )?license' => 'apache', 1,
'GPL' => 'gpl', 1,
......@@ -550,9 +551,9 @@ sub license_from {
sub _extract_bugtracker {
my @links = $_[0] =~ m#L<(
\Qhttp://rt.cpan.org/\E[^>]+|
\Qhttp://github.com/\E[\w_]+/[\w_]+/issues|
\Qhttp://code.google.com/p/\E[\w_\-]+/issues/list
https?\Q://rt.cpan.org/\E[^>]+|
https?\Q://github.com/\E[\w_]+/[\w_]+/issues|
https?\Q://code.google.com/p/\E[\w_\-]+/issues/list
)>#gx;
my %links;
@links{@links}=();
......
......@@ -6,7 +6,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
$VERSION = '1.00';
$VERSION = '1.01';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
......
......@@ -6,7 +6,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
$VERSION = '1.00';
$VERSION = '1.01';
@ISA = qw{Module::Install::Base};
$ISCORE = 1;
}
......
This diff is collapsed.
This diff is collapsed.
......@@ -4,7 +4,7 @@ use 5.006002;
use strict;
# use warnings; # dont use warnings for older Perls
our $VERSION = '1.993';
our $VERSION = '1.997';
# Package to store unsigned big integers in decimal and do math with them
......
......@@ -5,7 +5,7 @@ use strict;
# use warnings; # dont use warnings for older Perls
use vars qw/$VERSION/;
$VERSION = '1.993';
$VERSION = '1.997';
package Math::BigInt;
......
File mode changed from 100755 to 100644
#!/usr/bin/perl -w
use strict;
use Test::More tests => 3619;
use Test::More tests => 3635;
BEGIN { unshift @INC, 't'; }
......
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
......@@ -257,6 +257,14 @@ $x = $class->new('0.008'); $y = $class->new(2);
$x->bdiv(3,$y);
is ($x,'0.0027');
###############################################################################
# Verify that numify() returns a normalized value, and underflows and
# overflows when given "extreme" values.
like($class->new("12345e67")->numify(), qr/^1\.2345e\+?0*71$/);
like($class->new("1e-9999")->numify(), qr/^\+?0$/); # underflow
unlike($class->new("1e9999")->numify(), qr/^1(\.0*)?e\+?9+$/); # overflow
###############################################################################
# fsqrt() with set global A/P or A/P enabled on $x, also a test whether fsqrt()
# correctly modifies $x
......@@ -637,15 +645,12 @@ hexNaN:NaN
-5:-0b101
&numify
# uses bsstr() so 5 => 5e+0 to be compatible w/ Perls output
0:0e+1
+1:1e+0
1234:1234e+0
NaN:NaN
+inf:inf
-inf:-inf
-5:-5e+0
100:1e+2
-100:-1e+2
0:0
+1:1
1234:1234
-5:-5
100:100
-100:-100
&fnan
abc:NaN
2:NaN
......
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
......@@ -73,7 +73,7 @@ while (<DATA>)
} elsif ($f eq "bone") {
$try .= "\$x->bone('$args[1]');";
# some unary ops
} elsif ($f =~ /^b(nan|floor|ceil|sstr|neg|abs|inc|dec|not|sqrt|fac)$/) {
} elsif ($f =~ /^b(nan|floor|ceil|sstr|neg|abs|sgn|inc|dec|not|sqrt|fac)$/) {
$try .= "\$x->$f();";
} elsif ($f =~ /^(numify|length|stringify|as_hex|as_bin)$/) {
$try .= "\$x->$f();";
......@@ -523,6 +523,27 @@ is (ref($x),'Math::Foo');
# like 1e100000 crash on some platforms. So simple test for the string 'inf'
$x = $class->new('+inf'); is ($x,'inf');
###############################################################################
# numify() and 64 bit integer support
require Config;
SKIP: {
skip("no 64 bit integer support", 4)
unless $Config::Config{use64bitint} || $Config::Config{use64bitall};
# The following should not give "1.84467440737096e+19".
$x = $class -> new(2) -> bpow(64) -> bdec();
is($x -> bstr(), "18446744073709551615", "bigint 2**64-1 as string");
is($x -> numify(), "18446744073709551615", "bigint 2**64-1 as number");
# The following should not give "-9.22337203685478e+18".
$x = $class -> new(2) -> bpow(63) -> bneg();
is($x -> bstr(), "-9223372036854775808", "bigint -2**63 as string");
is($x -> numify(), "-9223372036854775808", "bigint -2**63 as number");
};
###############################################################################
###############################################################################
# the following tests only make sense with Math::BigInt::Calc or BareCalc or
......@@ -1201,6 +1222,13 @@ babsNaN:NaN
-1:1
+123456789:123456789
-123456789:123456789
&bsgn
NaN:NaN
+inf:1
-inf:-1
0:0
+123456789:1
-123456789:-1
&bcmp
bcmpNaN:bcmpNaN:
bcmpNaN:0:
......
#!/usr/bin/perl -w
use strict;
use Test::More tests => 3619 + 6;
use Test::More tests => 3635 + 6;
use Math::BigInt lib => 'Calc';
......
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
#!/usr/bin/perl
#
# Verify that
# - Math::BigInt::objectify() calls as_int() (or as_number(), as a fallback)
# if the target object class is Math::BigInt.
# - Math::BigInt::objectify() calls as_float() if the target object class is
# Math::BigFloat.
#
# See RT #16221 and RT #52124.
use strict;
use warnings;
package main;
use Test::More tests => 2;
use Math::BigInt;
use Math::BigFloat;
############################################################################
my $int = Math::BigInt->new(10);
my $int_percent = My::Percent::Float->new(100);
is($int * $int_percent, 10);
############################################################################
my $float = Math::BigFloat->new(10);
my $float_percent = My::Percent::Float->new(100);
is($float * $float_percent, 10);
############################################################################
package My::Percent::Int;
sub new {
my $class = shift;
my $num = shift;
return bless \$num, $class;
}
sub as_number {
my $self = shift;
return Math::BigInt->new($$self / 100);
}
sub as_string {
my $self = shift;
return $$self;
}
############################################################################
package My::Percent::Float;
sub new {
my $class = shift;
my $num = shift;
return bless \$num, $class;
}
sub as_int {
my $self = shift;
return Math::BigInt->new($$self / 100);
}
sub as_float {
my $self = shift;
return Math::BigFloat->new($$self / 100);
}
sub as_string {
my $self = shift;
return $$self;
}
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
#!/usr/bin/perl -w
use strict;
use Test::More tests => 3619
use Test::More tests => 3635
+ 5; # +5 own tests
BEGIN { unshift @INC, 't'; }
......
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
File mode changed from 100755 to 100644
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment