From: Zefram <zefram@fysh.org>
Date: Tue, 7 Feb 2012 13:52:13 +0000 (+0000)
Subject: restrict symbol export hack to threading builds
X-Git-Tag: 0.006010~2
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1479b0b1d8ae6404db89395beb373cce9cbb4834;p=p5sagit%2FDevel-Declare.git

restrict symbol export hack to threading builds
---

diff --git a/Changes b/Changes
index 3bdec52..df3846c 100644
--- 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
--- 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