XS-APItest/t/subsignature.t: remove debugging code

[perl5.git] / patchlevel.h

diff --git a/patchlevel.h b/patchlevel.h
index f94d151..8b4a36c 100644 (file)
--- a/patchlevel.h
+++ b/patchlevel.h
@@ -14,8 +14,8 @@
  * exactly on the third column */
 
 #define PERL_REVISION  5               /* age */
-#define PERL_VERSION   24              /* epoch */
-#define PERL_SUBVERSION        0               /* generation */
+#define PERL_VERSION   31              /* epoch */
+#define PERL_SUBVERSION        5               /* generation */
 
 /* The following numbers describe the earliest compatible version of
    Perl ("compatibility" here being defined as sufficient binary/API
@@ -35,8 +35,8 @@
    changing them should not be necessary.
 */
 #define PERL_API_REVISION      5
-#define PERL_API_VERSION       24
-#define PERL_API_SUBVERSION    0
+#define PERL_API_VERSION       31
+#define PERL_API_SUBVERSION    5
 /*
    XXX Note:  The selection of non-default Configure options, such
    as -Duselonglong may invalidate these settings.  Currently, Configure
@@ -90,8 +90,8 @@
 
 #!perl
 die "Usage: perl -x patchlevel.h comment ..." unless @ARGV;
-open PLIN, "patchlevel.h" or die "Couldn't open patchlevel.h : $!";
-open PLOUT, ">patchlevel.new" or die "Couldn't write on patchlevel.new : $!";
+open PLIN, "<", "patchlevel.h" or die "Couldn't open patchlevel.h : $!";
+open PLOUT, ">", "patchlevel.new" or die "Couldn't write on patchlevel.new : $!";
 my $seen=0;
 while (<PLIN>) {
     if (/\t,NULL/ and $seen) {
@@ -133,7 +133,6 @@ hunk.
 #  endif
 static const char * const local_patches[] = {
        NULL
-  ,"RC0"
 #ifdef PERL_GIT_UNCOMMITTED_CHANGES
        ,"uncommitted-changes"
 #endif