import Devel-Size 0.56 from CPAN

git-cpan-module:   Devel-Size
git-cpan-version:  0.56
git-cpan-authorid: DSUGAL
git-cpan-file:     authors/id/D/DS/DSUGAL/Devel-Size-0.56.tar.gz

diff --git a/Changes b/Changes
index e35fa9b..751b540 100644 (file)
--- a/Changes
+++ b/Changes
@@ -16,4 +16,7 @@ Revision history for Perl extension Devel::Size.
         - Fixed a bad size calculation (we were overestimating by one byte)
        - Updated the docs to show some of the places that there might be 'dark'
          memory that Devel::Size can't see.
-       - Added in tests from Ken Williams
\ No newline at end of file
+       - Added in tests from Ken Williams
+
+0.56  Mon Feb 24 12:10:13 2003
+        - Chopped out some C++ comments. D'oh! Version incremented for CPAN
\ No newline at end of file

diff --git a/Size.pm b/Size.pm
index dd1764a..f1a3866 100644 (file)
--- a/Size.pm
+++ b/Size.pm
@@ -24,7 +24,7 @@ require DynaLoader;
 @EXPORT = qw(
        
 );
-$VERSION = '0.55';
+$VERSION = '0.56';
 
 bootstrap Devel::Size $VERSION;
 

diff --git a/Size.xs b/Size.xs
index 02c16c3..348346d 100644 (file)
--- a/Size.xs
+++ b/Size.xs
@@ -323,12 +323,10 @@ CODE:
       
       size = thing_size(thing, tracking_hash);
       RETVAL += size;
-      //      printf("added thing of size %i, thing #%i\n", size, count++);
     }
   }
   
   /* Clean up after ourselves */
-  //  printf("For info, refcounts are %i, %i\n", SvREFCNT(tracking_hash), SvREFCNT(pending_array));
   SvREFCNT_dec(tracking_hash);
   SvREFCNT_dec(pending_array);
 }