From 566395ef9549c0c2957f1bc5716a3ca05d9d3483 Mon Sep 17 00:00:00 2001 From: "James E. Keenan" Date: Fri, 12 Mar 2010 22:00:57 -0500 Subject: [PATCH] EU::ParseXS Version bump Also nuke one more unused variable and fix a typo. --- dist/ExtUtils-ParseXS/lib/ExtUtils/ParseXS.pm | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/dist/ExtUtils-ParseXS/lib/ExtUtils/ParseXS.pm b/dist/ExtUtils-ParseXS/lib/ExtUtils/ParseXS.pm index 64de38f..716c634 100644 --- a/dist/ExtUtils-ParseXS/lib/ExtUtils/ParseXS.pm +++ b/dist/ExtUtils-ParseXS/lib/ExtUtils/ParseXS.pm @@ -16,10 +16,10 @@ use ExtUtils::ParseXS::Utilities qw( our (@ISA, @EXPORT_OK, $VERSION); @ISA = qw(Exporter); @EXPORT_OK = qw(process_file); -$VERSION = '2.2210_01'; +$VERSION = '3'; $VERSION = eval $VERSION if $VERSION =~ /_/; -# use strict; # One of these days... +# use strict; # One of these days ... my(@XSStack); # Stack of conditionals and INCLUDEs my($XSS_work_idx, $cpp_next_tmp); @@ -87,8 +87,6 @@ sub process_file { # clean this up sometime, probably. For now, we just pull them out # of %args. -Ken - # $cplusplus not used anywhere; deletable - my $cplusplus = $args{'C++'}; $hiertype = $args{hiertype}; $WantPrototypes = $args{prototypes}; $WantVersionChk = $args{versioncheck}; @@ -264,7 +262,7 @@ sub process_file { # Identify the version of xsubpp used print <