[Bast-commits] r4458 - in trunk/Devel-Declare: . lib/Devel
matthewt at dev.catalyst.perl.org
matthewt at dev.catalyst.perl.org
Tue Jun 3 08:06:54 BST 2008
Author: matthewt
Date: 2008-06-03 08:06:41 +0100 (Tue, 03 Jun 2008)
New Revision: 4458
Modified:
trunk/Devel-Declare/Changes
trunk/Devel-Declare/Declare.xs
trunk/Devel-Declare/Makefile.PL
trunk/Devel-Declare/lib/Devel/Declare.pm
Log:
Newx -> New
Modified: trunk/Devel-Declare/Changes
===================================================================
--- trunk/Devel-Declare/Changes 2008-06-02 20:02:05 UTC (rev 4457)
+++ trunk/Devel-Declare/Changes 2008-06-03 07:06:41 UTC (rev 4458)
@@ -1,5 +1,16 @@
Changes for Devel-Declare
+ - fix traits code to work on older 5.8.x perls
+
+0.001008
+ - turns out 0.1.7 in Makefile.PL results in that version going into
+ the .xs file as well as the dist name. Then everything breaks.
+
+0.001007
+ - bail on SvGROW during declare process since that can't work
+ - use a source filter on files and an op wrap on evals to pre-grow
+ PL_linestr so we don't get to the point of needing to bail
+
0.001006
- nasty goto &$func hack to avoid :lvalue+list context weirdness
- correct SvGROW invocation
Modified: trunk/Devel-Declare/Declare.xs
===================================================================
--- trunk/Devel-Declare/Declare.xs 2008-06-02 20:02:05 UTC (rev 4457)
+++ trunk/Devel-Declare/Declare.xs 2008-06-03 07:06:41 UTC (rev 4458)
@@ -178,7 +178,7 @@
while (*s && *s != '{') ++s;
if (*s) {
int tlen = s - traitstart;
- Newx(found_traits, tlen+1, char);
+ New(0, found_traits, tlen+1, char);
Copy(traitstart, found_traits, tlen, char);
found_traits[tlen] = 0;
#ifdef DD_DEBUG
Modified: trunk/Devel-Declare/Makefile.PL
===================================================================
--- trunk/Devel-Declare/Makefile.PL 2008-06-02 20:02:05 UTC (rev 4457)
+++ trunk/Devel-Declare/Makefile.PL 2008-06-03 07:06:41 UTC (rev 4458)
@@ -3,6 +3,7 @@
use 5.008001;
name 'Devel-Declare';
+version '0.001008';
all_from 'lib/Devel/Declare.pm';
requires 'Scalar::Util';
Modified: trunk/Devel-Declare/lib/Devel/Declare.pm
===================================================================
--- trunk/Devel-Declare/lib/Devel/Declare.pm 2008-06-02 20:02:05 UTC (rev 4457)
+++ trunk/Devel-Declare/lib/Devel/Declare.pm 2008-06-03 07:06:41 UTC (rev 4458)
@@ -4,7 +4,7 @@
use warnings;
use 5.008001;
-our $VERSION = '0.001006';
+our $VERSION = '0.001008';
# mirrored in Declare.xs as DD_HANDLE_*
More information about the Bast-commits
mailing list