Author: jawnsy-guest
Date: Fri Oct 2 17:11:47 2009
New Revision: 45235
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=45235
Log:
Integrate new upstream version
Modified:
trunk/libextutils-parsexs-perl/Changes
trunk/libextutils-parsexs-perl/META.yml
trunk/libextutils-parsexs-perl/debian/changelog
trunk/libextutils-parsexs-perl/lib/ExtUtils/ParseXS.pm
trunk/libextutils-parsexs-perl/t/basic.t
trunk/libextutils-parsexs-perl/t/usage.t
Modified: trunk/libextutils-parsexs-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-parsexs-perl/Changes?rev=45235&op=diff
==============================================================================
--- trunk/libextutils-parsexs-perl/Changes (original)
+++ trunk/libextutils-parsexs-perl/Changes Fri Oct 2 17:11:47 2009
@@ -1,4 +1,18 @@
Revision history for Perl extension ExtUtils::ParseXS.
+
+2.200403 - Fri Oct 2 02:01:58 EDT 2009
+
+ Other:
+ - Removed PERL_CORE specific @INC manipulation (no longer needed)
+ [Nicholas Clark]
+ - Changed hard-coded $^H manipulation in favor of "use re 'eval'"
+ [Nicholas Clark]
+
+2.200402 - Fri Oct 2 01:26:40 EDT 2009
+
+ Bug fixes:
+ - UNITCHECK subroutines were not being called (detected in ext/XS-APItest
+ in Perl blead) [reported by Jesse Vincent, patched by David Golden]
2.200401 - Mon Sep 14 22:26:03 EDT 2009
@@ -16,8 +30,8 @@
2.20_03 - Thu Jul 23 23:14:50 EDT 2009
Bug fixes:
- - Fixed "const char *" errors for 5.8.8 (and older) (RT#48104)
- [Vincent Pit]
+ - Fixed "const char *" errors for 5.8.8 (and older) (RT#48104)
+ [Vincent Pit]
- Added newline before a preprocessor directive (RT#30673)
[patch by hjp]
Modified: trunk/libextutils-parsexs-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-parsexs-perl/META.yml?rev=45235&op=diff
==============================================================================
--- trunk/libextutils-parsexs-perl/META.yml (original)
+++ trunk/libextutils-parsexs-perl/META.yml Fri Oct 2 17:11:47 2009
@@ -1,6 +1,6 @@
---
name: ExtUtils-ParseXS
-version: 2.200401
+version: 2.200403
author:
- 'Maintained by Ken Williams, <ken at mathforum.org>'
abstract: converts Perl XS code into C code
@@ -24,7 +24,7 @@
provides:
ExtUtils::ParseXS:
file: lib/ExtUtils/ParseXS.pm
- version: 2.200401
+ version: 2.200403
generated_by: Module::Build version 0.3502
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
Modified: trunk/libextutils-parsexs-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-parsexs-perl/debian/changelog?rev=45235&op=diff
==============================================================================
--- trunk/libextutils-parsexs-perl/debian/changelog (original)
+++ trunk/libextutils-parsexs-perl/debian/changelog Fri Oct 2 17:11:47 2009
@@ -1,7 +1,4 @@
-libextutils-parsexs-perl (2.200401-1) UNRELEASED; urgency=low
-
- These are only changes affecting older versions of perl (~ 5.8.8 and less)
- IGNORE-VERSION: 2.200401-1
+libextutils-parsexs-perl (2.200403-1) UNRELEASED; urgency=low
[ Jonathan Yu ]
* New upstream release
@@ -9,7 +6,7 @@
[ Ryan Niebur ]
* Update jawnsy's email address
- -- Jonathan Yu <jawnsy at cpan.org> Sun, 20 Sep 2009 10:19:47 -0400
+ -- Jonathan Yu <jawnsy at cpan.org> Fri, 02 Oct 2009 09:25:37 -0400
libextutils-parsexs-perl (2.2002-1) unstable; urgency=low
Modified: trunk/libextutils-parsexs-perl/lib/ExtUtils/ParseXS.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-parsexs-perl/lib/ExtUtils/ParseXS.pm?rev=45235&op=diff
==============================================================================
--- trunk/libextutils-parsexs-perl/lib/ExtUtils/ParseXS.pm (original)
+++ trunk/libextutils-parsexs-perl/lib/ExtUtils/ParseXS.pm Fri Oct 2 17:11:47 2009
@@ -18,7 +18,7 @@
my($XSS_work_idx, $cpp_next_tmp);
use vars qw($VERSION);
-$VERSION = '2.200401';
+$VERSION = '2.200403';
use vars qw(%input_expr %output_expr $ProtoUsed @InitFileCode $FH $proto_re $Overload $errors $Fallback
$cplusplus $hiertype $WantPrototypes $WantVersionChk $except $WantLineNumbers
@@ -210,7 +210,9 @@
$size = qr[,\s* (??{ $bal }) ]x; # Third arg (to setpvn)
foreach my $key (keys %output_expr) {
- BEGIN { $^H |= 0x00200000 }; # Equivalent to: use re 'eval', but hardcoded so we can compile re.xs
+ # We can still bootstrap compile 're', because in code re.pm is
+ # available to miniperl, and does not attempt to load the XS code.
+ use re 'eval';
my ($t, $with_size, $arg, $sarg) =
($output_expr{$key} =~
@@ -555,7 +557,6 @@
my $arg0 = ((defined($static) or $func_name eq 'new')
? "CLASS" : "THIS");
unshift(@args, $arg0);
-# ($report_args = "$arg0, $report_args") =~ s/^\w+, $/$arg0/;
}
my $extra_args = 0;
@args_num = ();
@@ -979,8 +980,6 @@
#Under 5.8.x and lower, newXS is declared in proto.h as expecting a non-const
#file name argument. If the wrong qualifier is used, it causes breakage with
#C++ compilers and warnings with recent gcc.
- my $file_decl = ($] < 5.009) ? "char file[]" : "const char* file";
-
#-Wall: if there is no $Full_func_name there are no xsubs in this .xs
#so `file' is unused
print Q(<<"EOF") if $Full_func_name;
@@ -1036,7 +1035,7 @@
}
print Q(<<'EOF');
-##ifdef PL_unitcheckav
+##if (PERL_REVISION == 5 && PERL_VERSION >= 9)
# if (PL_unitcheckav)
# call_list(PL_scopestack_ix, PL_unitcheckav);
##endif
Modified: trunk/libextutils-parsexs-perl/t/basic.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-parsexs-perl/t/basic.t?rev=45235&op=diff
==============================================================================
--- trunk/libextutils-parsexs-perl/t/basic.t (original)
+++ trunk/libextutils-parsexs-perl/t/basic.t Fri Oct 2 17:11:47 2009
@@ -1,13 +1,5 @@
#!/usr/bin/perl
-BEGIN {
- if ($ENV{PERL_CORE}) {
- chdir 't' if -d 't';
- chdir '../lib/ExtUtils/ParseXS'
- or die "Can't chdir to lib/ExtUtils/ParseXS: $!";
- @INC = qw(../.. ../../.. .);
- }
-}
use strict;
use Test::More;
use Config;
Modified: trunk/libextutils-parsexs-perl/t/usage.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libextutils-parsexs-perl/t/usage.t?rev=45235&op=diff
==============================================================================
--- trunk/libextutils-parsexs-perl/t/usage.t (original)
+++ trunk/libextutils-parsexs-perl/t/usage.t Fri Oct 2 17:11:47 2009
@@ -1,13 +1,5 @@
#!/usr/bin/perl
-BEGIN {
- if ($ENV{PERL_CORE}) {
- chdir 't' if -d 't';
- chdir '../lib/ExtUtils/ParseXS'
- or die "Can't chdir to lib/ExtUtils/ParseXS: $!";
- @INC = qw(../.. ../../.. .);
- }
-}
use strict;
use Test::More;
use Config;