Bump $VERSION to 0.79_50
[p5sagit/Devel-Size.git] / lib / Devel / Size.pm
index 9d3f08f..d25c4a8 100644 (file)
@@ -1,25 +1,22 @@
 package Devel::Size;
 
 use strict;
-use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $warn $dangle);
+use vars qw($VERSION @ISA @EXPORT_OK %EXPORT_TAGS $warn $dangle);
 
-require 5.008;
+require 5.005;
 require Exporter;
-require DynaLoader;
+require XSLoader;
 
-@ISA = qw(Exporter DynaLoader);
+@ISA = qw(Exporter);
 
-# This allows declaration   use Devel::Size ':all';
-%EXPORT_TAGS = ( 'all' => [ qw(
-    size total_size
-) ] );
+@EXPORT_OK = qw(size total_size);
 
-@EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
+# This allows declaration   use Devel::Size ':all';
+%EXPORT_TAGS = ( 'all' => \@EXPORT_OK );
 
-@EXPORT = qw( );
-$VERSION = '0.72_50';
+$VERSION = '0.79_50';
 
-bootstrap Devel::Size $VERSION;
+XSLoader::load( __PACKAGE__);
 
 $warn = 1;
 $dangle = 0; ## Set true to enable warnings about dangling pointers
@@ -190,7 +187,7 @@ larger.
 Since version 0.72, Devel::Size uses a new pointer tracking mechanism
 that consumes far less memory than was previously the case. It does this
 by using a bit vector where 1 bit represents each 4- or 8-byte aligned pointer
-(32- or 64-bit platform dependant) that could exist. Further, it segments
+(32- or 64-bit platform dependent) that could exist. Further, it segments
 that bit vector and only allocates each chunk when an address is seen within
 that chunk. Since version 0.73, chunks are allocated in blocks of 2**16 bits
 (ie 8K), accessed via a 256-way tree. The tree is 2 levels deep on a 32 bit
@@ -276,9 +273,11 @@ Dan Sugalski dan@sidhe.org
 
 Small portion taken from the B module as shipped with perl 5.6.2.
 
-New pointer tracking & exception handling by BrowserUK
+Previously maintained by Tels <http://bloodgate.com>
+
+New pointer tracking & exception handling for 0.72 by BrowserUK
 
-Maintained now by Tels <http://bloodgate.com>
+Currently maintained by Nicholas Clark
 
 =head1 COPYRIGHT