This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
EU::ParseXS Version bump
authorJames E. Keenan <jkeenan@cpan.org>
Sat, 13 Mar 2010 03:00:57 +0000 (22:00 -0500)
committerSteffen Mueller <smueller@cpan.org>
Tue, 12 Jul 2011 18:53:50 +0000 (20:53 +0200)
Also nuke one more unused variable and fix a typo.

dist/ExtUtils-ParseXS/lib/ExtUtils/ParseXS.pm

index 64de38f..716c634 100644 (file)
@@ -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 <<EOM;
 /*
- * This file was venerated automatically by ExtUtils::ParseXS version $VERSION from the
+ * This file was generated automatically by ExtUtils::ParseXS version $VERSION from the
  * contents of $filename. Do not edit this file, edit $filename instead.
  *
  *    ANY CHANGES MADE HERE WILL BE LOST!