From: Tim Bunce <Tim.Bunce@pobox.com>
Date: Sun, 30 Sep 2012 09:48:07 +0000 (+0900)
Subject: Mark suspect PERL_SUBVERSION macros
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=24638fb4e20cdaef575647a94726f2948f34602d;p=p5sagit%2FDevel-Size.git

Mark suspect PERL_SUBVERSION macros
---

diff --git a/Memory.xs b/Memory.xs
index d3634a4..e5df230 100644
--- a/Memory.xs
+++ b/Memory.xs
@@ -904,7 +904,7 @@ hek_size(pTHX_ struct state *st, HEK *hek, U32 shared, pPATH)
 }
 
 
-#if PERL_VERSION < 8 || PERL_SUBVERSION < 9
+#if PERL_VERSION < 8 || PERL_SUBVERSION < 9 /* XXX plain || seems like a bug */
 #  define SVt_LAST 16
 #endif
 
@@ -1150,7 +1150,7 @@ else warn("skipped suspect HeVAL %p", HeVAL(cur_entry));
     if (SvOOK(thing)) {
 	/* This direct access is arguably "naughty": */
 	struct mro_meta *meta = HvAUX(thing)->xhv_mro_meta;
-#if PERL_VERSION > 13 || PERL_SUBVERSION > 8
+#if PERL_VERSION > 13 || PERL_SUBVERSION > 8 /* XXX plain || seems like a bug */
 	/* As is this: */
 	I32 count = HvAUX(thing)->xhv_name_count;
 
diff --git a/README b/README
index 5da7c9c..ff97175 100644
--- a/README
+++ b/README
@@ -8,8 +8,8 @@ TODO
     Devel::SizeMe::Store - db write
     Devel::SizeMe::Data - db read / orlite?
     Devel::SizeMe::Graph - data reading/processing for sizeme_graph
-    sizeme_store
-    sizeme_graph
+    sizeme_store - script wrapper for Devel::SizeMe::Store
+    sizeme_graph - Mojolicious app wrapper using Devel::SizeMe::Graph
     tests
     Support multiple runs to same sizeme_store process, generating separate files
     Name runs to allow total_size (for example) of multiple data structures