X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=patchlevel.h;h=2f03a044d1877c5ca5673ea52caac027ababfa4d;hb=29ecdb6fa31693daf50c1386a8ec5d92fb7b0313;hp=44e63131dfc0ccccc09321caa720163ed1b43ab6;hpb=b7a757786860f1e30527e61f0ca87a677ce6777b;p=p5sagit%2Fp5-mst-13.2.git diff --git a/patchlevel.h b/patchlevel.h index 44e6313..2f03a04 100644 --- a/patchlevel.h +++ b/patchlevel.h @@ -1,7 +1,7 @@ /* patchlevel.h * * Copyright (C) 1993, 1995, 1996, 1997, 1998, 1999, - * 2000, 2001, 2002, 2003, by Larry Wall and others + * 2000, 2001, 2002, 2003, 2004, by Larry Wall and others * * You may distribute under the terms of either the GNU General Public * License or the Artistic License, as specified in the README file. @@ -15,7 +15,7 @@ #define PERL_REVISION 5 /* age */ #define PERL_VERSION 9 /* epoch */ -#define PERL_SUBVERSION 1 /* generation */ +#define PERL_SUBVERSION 3 /* generation */ /* The following numbers describe the earliest compatible version of Perl ("compatibility" here being defined as sufficient binary/API @@ -32,7 +32,7 @@ */ #define PERL_API_REVISION 5 /* Adjust manually as needed. */ #define PERL_API_VERSION 9 /* Adjust manually as needed. */ -#define PERL_API_SUBVERSION 1 /* Adjust manually as needed. */ +#define PERL_API_SUBVERSION 2 /* Adjust manually as needed. */ /* XXX Note: The selection of non-default Configure options, such as -Duselonglong may invalidate these settings. Currently, Configure @@ -100,6 +100,7 @@ while () { } close PLOUT or die "Couldn't close filehandle writing to patchlevel.new : $!"; close PLIN or die "Couldn't close filehandle reading from patchlevel.h : $!"; +close DATA; # needed to allow unlink to work win32. unlink "patchlevel.bak" or warn "Couldn't unlink patchlevel.bak : $!" if -e "patchlevel.bak"; rename "patchlevel.h", "patchlevel.bak" or @@ -114,11 +115,8 @@ hunk. */ - - - #if !defined(PERL_PATCHLEVEL_H_IMPLICIT) && !defined(LOCAL_PATCH_COUNT) -static char *local_patches[] = { +static const char * const local_patches[] = { NULL ,NULL };