restrict symbol export hack to threading builds

diff --git a/Changes b/Changes
index 3bdec52..df3846c 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Changes for Devel-Declare
 
+  - Fix workaround for unexported core symbols to avoid breaking
+    compilation on non-threading builds of Perl 5.8.
+
 0.006009 - 01 Feb 2012
   - Be adaptive about whether to delete the line reallocation filter,
     so as to play as nicely as possible with other kinds of source filter.

diff --git a/stolen_chunk_of_toke.c b/stolen_chunk_of_toke.c
index 3f576f2..6da1a81 100644 (file)
--- a/stolen_chunk_of_toke.c
+++ b/stolen_chunk_of_toke.c
@@ -108,7 +108,7 @@ STATIC char*    S_scan_word(pTHX_ char *s, char *dest, STRLEN destlen, int allow
 #define PERL_5_9_PLUS
 #endif
 
-#ifndef PERL_5_9_PLUS
+#if !defined(PERL_5_9_PLUS) && defined(PERL_IMPLICIT_CONTEXT)
 /* These two are not exported from the core on Windows.  With 5.9+
    it's not an issue, because they're part of the PL_parser structure,
    which is exported.  On multiplicity/thread builds we can work