This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
bignum tests: use eval block to load Math::BigInt::Lite
authorOlivier Mengué <dolmen@cpan.org>
Thu, 4 Sep 2014 22:27:15 +0000 (00:27 +0200)
committerFather Chrysostomos <sprout@cpan.org>
Fri, 5 Sep 2014 01:09:01 +0000 (18:09 -0700)
dist/bignum/t/bn_lite.t
dist/bignum/t/br_lite.t

index 28e38c5..c2a04cd 100644 (file)
@@ -5,8 +5,7 @@
 use strict;
 use Test::More;
 
-eval 'require Math::BigInt::Lite;';
-if ($@ eq '')
+if (eval { require Math::BigInt::Lite; 1 })
   {
   plan (tests => 1);
   # can use Lite, so let bignum try it
index fd63252..4e75356 100644 (file)
@@ -5,8 +5,7 @@
 use strict;
 use Test::More;
 
-eval 'require Math::BigInt::Lite;';
-if ($@ eq '')
+if (eval { require Math::BigInt::Lite; 1 })
   {
   plan (tests => 1);
   # can use Lite, so let bignum try it