From: rafl <rafl@bd8105ee-0ff8-0310-8827-fb3f25b6796d>
Date: Sun, 12 Oct 2008 14:26:12 +0000 (+0000)
Subject: clear_lex_stuff returns void, not char *.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a69693e800d0064f78c4a30046928b67aa54992b;p=p5sagit%2FDevel-Declare.git

clear_lex_stuff returns void, not char *.

git-svn-id: http://dev.catalyst.perl.org/repos/bast/Devel-Declare/1.000/trunk@4915 bd8105ee-0ff8-0310-8827-fb3f25b6796d
---

diff --git a/Declare.xs b/Declare.xs
index 3ad99ad..3b8c5dd 100644
--- a/Declare.xs
+++ b/Declare.xs
@@ -126,7 +126,7 @@ char* dd_get_lex_stuff(pTHX) {
   return (DD_HAVE_LEX_STUFF ? SvPVX(PL_lex_stuff) : "");
 }
 
-char* dd_clear_lex_stuff(pTHX) {
+void dd_clear_lex_stuff(pTHX) {
   if (DD_HAVE_PARSER)
     PL_lex_stuff = (SV*)NULL;
 }