[Bast-commits] r4915 - Devel-Declare/1.000/trunk

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2008-10-12 15:26:12 +0100 (Sun, 12 Oct 2008)
New Revision: 4915

Modified:
   Devel-Declare/1.000/trunk/Declare.xs
Log:
clear_lex_stuff returns void, not char *.

Modified: Devel-Declare/1.000/trunk/Declare.xs
===================================================================
--- Devel-Declare/1.000/trunk/Declare.xs	2008-10-12 14:25:52 UTC (rev 4914)
+++ Devel-Declare/1.000/trunk/Declare.xs	2008-10-12 14:26:12 UTC (rev 4915)
@@ -126,7 +126,7 @@
   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;
 }