From: Matt S Trout <mst@shadowcat.co.uk>
Date: Tue, 30 Sep 2008 12:01:11 +0000 (+0000)
Subject: nuke PERL_5_9_PLUS
X-Git-Tag: 0.005000~86
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5e9a4dee07a4c27dc42101545a38226461da292e;p=p5sagit%2FDevel-Declare.git

nuke PERL_5_9_PLUS
---

diff --git a/Changes b/Changes
index 619e00e..bdbd9d2 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,6 @@
 Changes for Devel-Declare
 
+  - eliminate PERL_5_9_PLUS macro in favour of ifdef PL_parser
   - clean up checks for whether we're lexing and whether lex_stuff exists
     to handle the PL_parser factor-out in 5.10
 
diff --git a/stolen_chunk_of_toke.c b/stolen_chunk_of_toke.c
index 54f67e9..3f0f896 100644
--- a/stolen_chunk_of_toke.c
+++ b/stolen_chunk_of_toke.c
@@ -83,11 +83,7 @@ STATIC char*    S_scan_word(pTHX_ char *s, char *dest, STRLEN destlen, int allow
 #define PERL_5_8_8_PLUS
 #endif
 
-#if PERL_REVISION == 5 && PERL_VERSION > 8
-#define PERL_5_9_PLUS
-#endif
-
-#ifdef PERL_5_9_PLUS
+#ifdef PL_parser
 /* 5.9+ moves a bunch of things to a PL_parser struct so we need to
    declare the backcompat macros for things to still work (mst) */