From: Marcus Holland-Moritz Date: Sun, 18 Jan 2009 17:44:08 +0000 (+0100) Subject: Upgrade to Devel::PPPort 3.15 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=51d6c659b2001c862a5d43af7e07ffe8fc2a4e63;p=p5sagit%2Fp5-mst-13.2.git Upgrade to Devel::PPPort 3.15 --- diff --git a/ext/Devel/PPPort/Changes b/ext/Devel/PPPort/Changes index 9b27100..25d701d 100644 --- a/ext/Devel/PPPort/Changes +++ b/ext/Devel/PPPort/Changes @@ -1,3 +1,9 @@ +3.15 - 2009-01-18 + + * added support for the following API + DEFSV_set + * fix --unstrip for development versions + 3.14_05 - 2008-10-31 * fix stupid bugs in pv_pretty tests (only the diff --git a/ext/Devel/PPPort/HACKERS b/ext/Devel/PPPort/HACKERS index 0a80fb2..540947f 100644 --- a/ext/Devel/PPPort/HACKERS +++ b/ext/Devel/PPPort/HACKERS @@ -309,7 +309,7 @@ module in the core: =head1 COPYRIGHT -Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. Version 2.x, Copyright (C) 2001, Paul Marquess. diff --git a/ext/Devel/PPPort/Makefile.PL b/ext/Devel/PPPort/Makefile.PL index 3a7597c..e2035b3 100644 --- a/ext/Devel/PPPort/Makefile.PL +++ b/ext/Devel/PPPort/Makefile.PL @@ -4,13 +4,13 @@ # ################################################################################ # -# $Revision: 28 $ +# $Revision: 29 $ # $Author: mhx $ -# $Date: 2008/01/04 10:47:38 +0100 $ +# $Date: 2009/01/18 14:10:49 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # diff --git a/ext/Devel/PPPort/PPPort_pm.PL b/ext/Devel/PPPort/PPPort_pm.PL index 3eef5dd..663ff9d 100644 --- a/ext/Devel/PPPort/PPPort_pm.PL +++ b/ext/Devel/PPPort/PPPort_pm.PL @@ -4,13 +4,13 @@ # ################################################################################ # -# $Revision: 63 $ +# $Revision: 64 $ # $Author: mhx $ -# $Date: 2008/10/30 01:47:31 +0100 $ +# $Date: 2009/01/18 14:10:49 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # @@ -372,13 +372,13 @@ __DATA__ # ################################################################################ # -# $Revision: 63 $ +# $Revision: 64 $ # $Author: mhx $ -# $Date: 2008/10/30 01:47:31 +0100 $ +# $Date: 2009/01/18 14:10:49 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # @@ -515,7 +515,7 @@ Version 3.x was ported back to CPAN by Marcus Holland-Moritz. =head1 COPYRIGHT -Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. Version 2.x, Copyright (C) 2001, Paul Marquess. @@ -535,7 +535,7 @@ package Devel::PPPort; use strict; use vars qw($VERSION $data); -$VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.14_05 $' =~ /(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' }; +$VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.15 $' =~ /(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' }; sub _init_data { diff --git a/ext/Devel/PPPort/PPPort_xs.PL b/ext/Devel/PPPort/PPPort_xs.PL index 704fedb..8d9fd4f 100644 --- a/ext/Devel/PPPort/PPPort_xs.PL +++ b/ext/Devel/PPPort/PPPort_xs.PL @@ -4,13 +4,13 @@ # ################################################################################ # -# $Revision: 14 $ +# $Revision: 15 $ # $Author: mhx $ -# $Date: 2008/01/04 10:47:37 +0100 $ +# $Date: 2009/01/18 14:10:48 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # @@ -93,13 +93,13 @@ __DATA__ * ******************************************************************************** * -* $Revision: 14 $ +* $Revision: 15 $ * $Author: mhx $ -* $Date: 2008/01/04 10:47:37 +0100 $ +* $Date: 2009/01/18 14:10:48 +0100 $ * ******************************************************************************** * -* Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +* Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. * Version 2.x, Copyright (C) 2001, Paul Marquess. * Version 1.x, Copyright (C) 1999, Kenneth Albanowski. * diff --git a/ext/Devel/PPPort/README b/ext/Devel/PPPort/README index 42def29..fc24309 100644 --- a/ext/Devel/PPPort/README +++ b/ext/Devel/PPPort/README @@ -69,7 +69,7 @@ to create a ticket for the module. 5. COPYRIGHT ------------ -Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. Version 2.x, Copyright (C) 2001, Paul Marquess. Version 1.x, Copyright (C) 1999, Kenneth Albanowski. diff --git a/ext/Devel/PPPort/apicheck_c.PL b/ext/Devel/PPPort/apicheck_c.PL index 35ba9ed..e4d861e 100644 --- a/ext/Devel/PPPort/apicheck_c.PL +++ b/ext/Devel/PPPort/apicheck_c.PL @@ -4,13 +4,13 @@ # ################################################################################ # -# $Revision: 10 $ +# $Revision: 11 $ # $Author: mhx $ -# $Date: 2008/01/04 10:47:37 +0100 $ +# $Date: 2009/01/18 14:10:49 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # diff --git a/ext/Devel/PPPort/devel/buildperl.pl b/ext/Devel/PPPort/devel/buildperl.pl index 74a1682..49b7fbb 100644 --- a/ext/Devel/PPPort/devel/buildperl.pl +++ b/ext/Devel/PPPort/devel/buildperl.pl @@ -5,13 +5,13 @@ # ################################################################################ # -# $Revision: 14 $ +# $Revision: 15 $ # $Author: mhx $ -# $Date: 2008/04/13 13:49:37 +0200 $ +# $Date: 2009/01/18 14:10:50 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # @@ -528,7 +528,7 @@ options, use: =head1 COPYRIGHT -Copyright (c) 2004-2008, Marcus Holland-Moritz. +Copyright (c) 2004-2009, Marcus Holland-Moritz. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff --git a/ext/Devel/PPPort/devel/devtools.pl b/ext/Devel/PPPort/devel/devtools.pl index a94c634..a87c172 100644 --- a/ext/Devel/PPPort/devel/devtools.pl +++ b/ext/Devel/PPPort/devel/devtools.pl @@ -4,13 +4,13 @@ # ################################################################################ # -# $Revision: 4 $ +# $Revision: 5 $ # $Author: mhx $ -# $Date: 2008/01/04 10:47:38 +0100 $ +# $Date: 2009/01/18 14:10:50 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # diff --git a/ext/Devel/PPPort/devel/mkapidoc.sh b/ext/Devel/PPPort/devel/mkapidoc.sh index 5f7ad93..a4de2b4 100644 --- a/ext/Devel/PPPort/devel/mkapidoc.sh +++ b/ext/Devel/PPPort/devel/mkapidoc.sh @@ -5,13 +5,13 @@ # ################################################################################ # -# $Revision: 11 $ +# $Revision: 13 $ # $Author: mhx $ -# $Date: 2008/01/04 10:47:39 +0100 $ +# $Date: 2009/01/18 14:10:50 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # @@ -65,7 +65,7 @@ if isperlroot $PERLROOT; then cat >$OUTPUT < 33 +=tests plan => 38 use vars qw($my_sv @my_av %my_hv); @@ -464,6 +478,15 @@ else { ok(1); } +my @r = &Devel::PPPort::DEFSV_modify(); + +ok(@r == 3); +ok($r[0], 'Fred'); +ok($r[1], 'DEFSV'); +ok($r[2], 'Fred'); + +ok(&Devel::PPPort::DEFSV(), "Fred"); + eval { 1 }; ok(!&Devel::PPPort::ERRSV()); eval { cannot_call_this_one() }; diff --git a/ext/Devel/PPPort/parts/inc/newCONSTSUB b/ext/Devel/PPPort/parts/inc/newCONSTSUB index 5eda721..4b266d7 100644 --- a/ext/Devel/PPPort/parts/inc/newCONSTSUB +++ b/ext/Devel/PPPort/parts/inc/newCONSTSUB @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 14 $ +## $Revision: 15 $ ## $Author: mhx $ -## $Date: 2008/10/12 19:02:04 +0200 $ +## $Date: 2009/01/18 14:10:55 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/newRV b/ext/Devel/PPPort/parts/inc/newRV index d786780..1467d1a 100644 --- a/ext/Devel/PPPort/parts/inc/newRV +++ b/ext/Devel/PPPort/parts/inc/newRV @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 8 $ +## $Revision: 9 $ ## $Author: mhx $ -## $Date: 2008/01/04 10:47:43 +0100 $ +## $Date: 2009/01/18 14:10:55 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/newSVpv b/ext/Devel/PPPort/parts/inc/newSVpv index aaaed46..3a38549 100644 --- a/ext/Devel/PPPort/parts/inc/newSVpv +++ b/ext/Devel/PPPort/parts/inc/newSVpv @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 5 $ +## $Revision: 6 $ ## $Author: mhx $ -## $Date: 2008/10/21 23:14:47 +0200 $ +## $Date: 2009/01/18 14:10:51 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/podtest b/ext/Devel/PPPort/parts/inc/podtest index 1466a60..ceea0cf 100644 --- a/ext/Devel/PPPort/parts/inc/podtest +++ b/ext/Devel/PPPort/parts/inc/podtest @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 8 $ +## $Revision: 9 $ ## $Author: mhx $ -## $Date: 2008/01/04 10:47:40 +0100 $ +## $Date: 2009/01/18 14:10:52 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/ppphbin b/ext/Devel/PPPort/parts/inc/ppphbin index 838a4e1..583f266 100644 --- a/ext/Devel/PPPort/parts/inc/ppphbin +++ b/ext/Devel/PPPort/parts/inc/ppphbin @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 48 $ +## $Revision: 50 $ ## $Author: mhx $ -## $Date: 2008/10/12 19:02:39 +0200 $ +## $Date: 2009/01/18 14:10:54 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## @@ -791,7 +791,7 @@ sub strip if (\@ARGV && \$ARGV[0] eq '--unstrip') { eval { require Devel::PPPort }; \$@ and die "Cannot require Devel::PPPort, please install.\\n"; - if (\$Devel::PPPort::VERSION < $VERSION) { + if (eval \$Devel::PPPort::VERSION < $VERSION) { die "$0 was originally generated with Devel::PPPort $VERSION.\\n" . "Your Devel::PPPort is only version \$Devel::PPPort::VERSION.\\n" . "Please install a newer version, or --unstrip will not work.\\n"; diff --git a/ext/Devel/PPPort/parts/inc/ppphdoc b/ext/Devel/PPPort/parts/inc/ppphdoc index 5d5f4e6..62d4841 100644 --- a/ext/Devel/PPPort/parts/inc/ppphdoc +++ b/ext/Devel/PPPort/parts/inc/ppphdoc @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 31 $ +## $Revision: 32 $ ## $Author: mhx $ -## $Date: 2008/01/04 10:47:42 +0100 $ +## $Date: 2009/01/18 14:10:54 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## @@ -336,7 +336,7 @@ module from CPAN. =head1 COPYRIGHT -Version 3.x, Copyright (c) 2004-2008, Marcus Holland-Moritz. +Version 3.x, Copyright (c) 2004-2009, Marcus Holland-Moritz. Version 2.x, Copyright (C) 2001, Paul Marquess. diff --git a/ext/Devel/PPPort/parts/inc/ppphtest b/ext/Devel/PPPort/parts/inc/ppphtest index 3afec7b..8162aa0 100644 --- a/ext/Devel/PPPort/parts/inc/ppphtest +++ b/ext/Devel/PPPort/parts/inc/ppphtest @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 44 $ +## $Revision: 45 $ ## $Author: mhx $ -## $Date: 2008/10/12 20:53:51 +0200 $ +## $Date: 2009/01/18 14:10:53 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/pv_tools b/ext/Devel/PPPort/parts/inc/pv_tools index 161a49b..c7e4c1e 100644 --- a/ext/Devel/PPPort/parts/inc/pv_tools +++ b/ext/Devel/PPPort/parts/inc/pv_tools @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 4 $ +## $Revision: 5 $ ## $Author: mhx $ -## $Date: 2008/10/31 08:15:55 +0100 $ +## $Date: 2009/01/18 14:10:51 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/pvs b/ext/Devel/PPPort/parts/inc/pvs index 0262adb..73bc9fb 100644 --- a/ext/Devel/PPPort/parts/inc/pvs +++ b/ext/Devel/PPPort/parts/inc/pvs @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 8 $ +## $Revision: 9 $ ## $Author: mhx $ -## $Date: 2008/01/04 12:02:59 +0100 $ +## $Date: 2009/01/18 14:10:52 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/shared_pv b/ext/Devel/PPPort/parts/inc/shared_pv index 4c36c99..db779be 100644 --- a/ext/Devel/PPPort/parts/inc/shared_pv +++ b/ext/Devel/PPPort/parts/inc/shared_pv @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 4 $ +## $Revision: 5 $ ## $Author: mhx $ -## $Date: 2008/01/04 10:47:40 +0100 $ +## $Date: 2009/01/18 14:10:52 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/snprintf b/ext/Devel/PPPort/parts/inc/snprintf index 9c92310..310bfba 100644 --- a/ext/Devel/PPPort/parts/inc/snprintf +++ b/ext/Devel/PPPort/parts/inc/snprintf @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 5 $ +## $Revision: 6 $ ## $Author: mhx $ -## $Date: 2008/08/01 23:26:01 +0200 $ +## $Date: 2009/01/18 14:10:52 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/sprintf b/ext/Devel/PPPort/parts/inc/sprintf index bb9617f..6756f9a 100644 --- a/ext/Devel/PPPort/parts/inc/sprintf +++ b/ext/Devel/PPPort/parts/inc/sprintf @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 1 $ +## $Revision: 2 $ ## $Author: mhx $ -## $Date: 2008/07/13 19:13:58 +0200 $ +## $Date: 2009/01/18 14:10:51 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/strlfuncs b/ext/Devel/PPPort/parts/inc/strlfuncs index c4802e3..d351703 100644 --- a/ext/Devel/PPPort/parts/inc/strlfuncs +++ b/ext/Devel/PPPort/parts/inc/strlfuncs @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 5 $ +## $Revision: 6 $ ## $Author: mhx $ -## $Date: 2008/01/04 14:54:44 +0100 $ +## $Date: 2009/01/18 14:10:52 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/sv_xpvf b/ext/Devel/PPPort/parts/inc/sv_xpvf index ea474fa..3c990c6 100644 --- a/ext/Devel/PPPort/parts/inc/sv_xpvf +++ b/ext/Devel/PPPort/parts/inc/sv_xpvf @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 9 $ +## $Revision: 10 $ ## $Author: mhx $ -## $Date: 2008/01/04 10:47:41 +0100 $ +## $Date: 2009/01/18 14:10:53 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/threads b/ext/Devel/PPPort/parts/inc/threads index fe5a153..518bdf1 100644 --- a/ext/Devel/PPPort/parts/inc/threads +++ b/ext/Devel/PPPort/parts/inc/threads @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 10 $ +## $Revision: 11 $ ## $Author: mhx $ -## $Date: 2008/01/04 10:47:42 +0100 $ +## $Date: 2009/01/18 14:10:53 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/uv b/ext/Devel/PPPort/parts/inc/uv index d638fb8..5fdec7a 100644 --- a/ext/Devel/PPPort/parts/inc/uv +++ b/ext/Devel/PPPort/parts/inc/uv @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 16 $ +## $Revision: 17 $ ## $Author: mhx $ -## $Date: 2008/01/04 10:47:42 +0100 $ +## $Date: 2009/01/18 14:10:54 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/variables b/ext/Devel/PPPort/parts/inc/variables index b9bcd13..3058412 100644 --- a/ext/Devel/PPPort/parts/inc/variables +++ b/ext/Devel/PPPort/parts/inc/variables @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 18 $ +## $Revision: 19 $ ## $Author: mhx $ -## $Date: 2008/10/21 23:15:31 +0200 $ +## $Date: 2009/01/18 14:10:53 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/version b/ext/Devel/PPPort/parts/inc/version index cd5ae18..ca8d8a6 100644 --- a/ext/Devel/PPPort/parts/inc/version +++ b/ext/Devel/PPPort/parts/inc/version @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 9 $ +## $Revision: 10 $ ## $Author: mhx $ -## $Date: 2008/01/04 10:47:43 +0100 $ +## $Date: 2009/01/18 14:10:54 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/inc/warn b/ext/Devel/PPPort/parts/inc/warn index cdcf71c..76bd881 100644 --- a/ext/Devel/PPPort/parts/inc/warn +++ b/ext/Devel/PPPort/parts/inc/warn @@ -1,12 +1,12 @@ ################################################################################ ## -## $Revision: 6 $ +## $Revision: 7 $ ## $Author: mhx $ -## $Date: 2008/01/04 10:47:41 +0100 $ +## $Date: 2009/01/18 14:10:52 +0100 $ ## ################################################################################ ## -## Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +## Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. ## Version 2.x, Copyright (C) 2001, Paul Marquess. ## Version 1.x, Copyright (C) 1999, Kenneth Albanowski. ## diff --git a/ext/Devel/PPPort/parts/ppport.fnc b/ext/Devel/PPPort/parts/ppport.fnc index 5348fb6..567955e 100644 --- a/ext/Devel/PPPort/parts/ppport.fnc +++ b/ext/Devel/PPPort/parts/ppport.fnc @@ -4,13 +4,13 @@ : :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: : -: $Revision: 2 $ +: $Revision: 3 $ : $Author: mhx $ -: $Date: 2008/01/04 10:47:39 +0100 $ +: $Date: 2009/01/18 14:10:51 +0100 $ : :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: : -: Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +: Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. : Version 2.x, Copyright (C) 2001, Paul Marquess. : Version 1.x, Copyright (C) 1999, Kenneth Albanowski. : diff --git a/ext/Devel/PPPort/parts/ppptools.pl b/ext/Devel/PPPort/parts/ppptools.pl index b81c8aa..36830eb 100644 --- a/ext/Devel/PPPort/parts/ppptools.pl +++ b/ext/Devel/PPPort/parts/ppptools.pl @@ -4,13 +4,13 @@ # ################################################################################ # -# $Revision: 26 $ +# $Revision: 27 $ # $Author: mhx $ -# $Date: 2008/10/12 19:03:01 +0200 $ +# $Date: 2009/01/18 14:10:51 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # diff --git a/ext/Devel/PPPort/soak b/ext/Devel/PPPort/soak index b9a3c78..02ee38c 100644 --- a/ext/Devel/PPPort/soak +++ b/ext/Devel/PPPort/soak @@ -7,13 +7,13 @@ # ################################################################################ # -# $Revision: 18 $ +# $Revision: 19 $ # $Author: mhx $ -# $Date: 2008/01/04 10:47:38 +0100 $ +# $Date: 2009/01/18 14:10:50 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. # @@ -33,7 +33,7 @@ use File::Find; use List::Util qw(max); use Config; -my $VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.14_05 $' =~ /(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' }; +my $VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.15 $' =~ /(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' }; $| = 1; my %OPT = ( @@ -589,7 +589,7 @@ going on, use the I<--verbose> option: =head1 COPYRIGHT -Version 3.x, Copyright (c) 2004-2008, Marcus Holland-Moritz. +Version 3.x, Copyright (c) 2004-2009, Marcus Holland-Moritz. Version 2.x, Copyright (C) 2001, Paul Marquess. diff --git a/ext/Devel/PPPort/t/misc.t b/ext/Devel/PPPort/t/misc.t index 57ed4df..bbcf4b3 100644 --- a/ext/Devel/PPPort/t/misc.t +++ b/ext/Devel/PPPort/t/misc.t @@ -30,9 +30,9 @@ BEGIN { require 'testutil.pl' if $@; } - if (33) { + if (38) { load(); - plan(tests => 33); + plan(tests => 38); } } @@ -69,6 +69,15 @@ else { ok(1); } +my @r = &Devel::PPPort::DEFSV_modify(); + +ok(@r == 3); +ok($r[0], 'Fred'); +ok($r[1], 'DEFSV'); +ok($r[2], 'Fred'); + +ok(&Devel::PPPort::DEFSV(), "Fred"); + eval { 1 }; ok(!&Devel::PPPort::ERRSV()); eval { cannot_call_this_one() }; diff --git a/ext/Devel/PPPort/typemap b/ext/Devel/PPPort/typemap index c2030c1..f2118a8 100644 --- a/ext/Devel/PPPort/typemap +++ b/ext/Devel/PPPort/typemap @@ -4,13 +4,13 @@ # ################################################################################ # -# $Revision: 7 $ +# $Revision: 8 $ # $Author: mhx $ -# $Date: 2008/01/04 10:47:37 +0100 $ +# $Date: 2009/01/18 14:10:48 +0100 $ # ################################################################################ # -# Version 3.x, Copyright (C) 2004-2008, Marcus Holland-Moritz. +# Version 3.x, Copyright (C) 2004-2009, Marcus Holland-Moritz. # Version 2.x, Copyright (C) 2001, Paul Marquess. # Version 1.x, Copyright (C) 1999, Kenneth Albanowski. #