import Devel-Size 0.54 from CPAN
Dan Sugalski [Sat, 12 Oct 2002 18:14:42 +0000 (10:14 -0800)]
git-cpan-module:   Devel-Size
git-cpan-version:  0.54
git-cpan-authorid: DSUGAL
git-cpan-file:     authors/id/D/DS/DSUGAL/Devel-Size-0.54.tar.gz

Changes
Size.pm
Size.xs

diff --git a/Changes b/Changes
index 3091c2b..c1860da 100644 (file)
--- a/Changes
+++ b/Changes
@@ -7,4 +7,7 @@ Revision history for Perl extension Devel::Size.
 0.53  Thu Oct 10 12:30:00 2002
         - Finally started updating Changes file
        - Applied doc patch from Ann Barcomb
-       - Got globs sizing right
\ No newline at end of file
+       - Got globs sizing right
+
+0.54  Sat Oct 12 14:11:00 2002
+       - Applied a patch to get it working on 5.8.0 under Tru64
diff --git a/Size.pm b/Size.pm
index f568bc2..0dac1ce 100644 (file)
--- a/Size.pm
+++ b/Size.pm
@@ -24,7 +24,7 @@ require DynaLoader;
 @EXPORT = qw(
        
 );
-$VERSION = '0.53';
+$VERSION = '0.54';
 
 bootstrap Devel::Size $VERSION;
 
@@ -82,7 +82,7 @@ None but default, but optionally C<size> and C<total_size>.
 
 =head1 BUGS
 
-Doesn't currently walk all the bits for code refs, globs, formats, and
+Doesn't currently walk all the bits for code refs, formats, and
 IO. Those throw a warning, but a minimum size for them is returned.
 
 =head1 AUTHOR
diff --git a/Size.xs b/Size.xs
index 33699d1..43b45ce 100644 (file)
--- a/Size.xs
+++ b/Size.xs
@@ -199,9 +199,10 @@ UV thing_size(SV *orig_thing, HV *tracking_hash) {
   return total_size;
 }
 
-
 MODULE = Devel::Size           PACKAGE = Devel::Size           
 
+PROTOTYPES: DISABLE
+
 IV
 size(orig_thing)
      SV *orig_thing