ANNOUNCE: Math-BigInt v1.62

[p5sagit/p5-mst-13.2.git] / lib / Math / BigInt / t / bigfltpm.t

diff --git a/lib/Math/BigInt/t/bigfltpm.t b/lib/Math/BigInt/t/bigfltpm.t
index 28ae2b3..bab134f 100755 (executable)
--- a/lib/Math/BigInt/t/bigfltpm.t
+++ b/lib/Math/BigInt/t/bigfltpm.t
@@ -26,7 +26,8 @@ BEGIN
     }
   print "# INC = @INC\n";
 
-  plan tests => 1586;
+  plan tests => 1643
+       + 2;            # own tests
   }
 
 use Math::BigInt;
@@ -35,5 +36,8 @@ use Math::BigFloat;
 use vars qw ($class $try $x $y $f @args $ans $ans1 $ans1_str $setup $CL);
 $class = "Math::BigFloat";
 $CL = "Math::BigInt::Calc";
-   
+
+ok ($class->config()->{class},$class);
+ok ($class->config()->{with},'Math::BigInt');
+ 
 require 'bigfltpm.inc';        # all tests here for sharing