X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fbigrat.pm;h=ddc053426e2a61d05d2bbf1564360f2878c91a6e;hb=5fef21a34e2a36dc7c83d55110ccc5c57cc7d14d;hp=ed3787586391d6fc8f7302990335c7af0b8f3c78;hpb=126f3c5f1f20a40de59db499161effaa9e24e4fc;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/bigrat.pm b/lib/bigrat.pm
index ed37875..ddc0534 100644
--- a/lib/bigrat.pm
+++ b/lib/bigrat.pm
@@ -1,10 +1,11 @@
 package bigrat;
 require 5.005;
 
-$VERSION = '0.04';
+$VERSION = '0.05';
 use Exporter;
-@ISA =       qw( Exporter );
-@EXPORT_OK = qw( ); 
+@ISA		= qw( Exporter );
+@EXPORT_OK	= qw( ); 
+@EXPORT		= qw( inf NaN ); 
 
 use strict;
 
@@ -107,7 +108,6 @@ sub import
     {
     require Math::BigInt::Trace; $class = 'Math::BigInt::Trace';
     $upgrade = 'Math::BigFloat::Trace';
-    print STDERR "Loading $class";
     }
   else
     {
@@ -142,8 +142,12 @@ sub import
     print "Math::BigRat\t\t v$Math::BigRat::VERSION\n";
     exit;
     }
+  $self->export_to_level(1,$self,@a);           # export inf and NaN
   }
 
+sub inf () { Math::BigInt->binf(); }
+sub NaN () { Math::BigInt->bnan(); }
+
 1;
 
 __END__