Mark suspect PERL_SUBVERSION macros
Tim Bunce [Sun, 30 Sep 2012 09:48:07 +0000 (18:48 +0900)]
Memory.xs
README

index d3634a4..e5df230 100644 (file)
--- 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 (file)
--- 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