diff options
| -rw-r--r-- | Porting/regcharclass.pl | 28 | ||||
| -rw-r--r-- | regcharclass.h | 30 |
2 files changed, 33 insertions, 25 deletions
diff --git a/Porting/regcharclass.pl b/Porting/regcharclass.pl index 5202fc3f9e..21372dad11 100644 --- a/Porting/regcharclass.pl +++ b/Porting/regcharclass.pl @@ -435,19 +435,22 @@ rename $path,"$path.bak"; open my $out_fh,">",$path or die "Can't write to '$path':$!"; binmode $out_fh; # want unix line endings even when run on win32. -my ($zero)=$0=~/([^\\\/]+)$/; +my ($zero) = $0=~/([^\\\/]+)$/; print $out_fh <<"HEADER"; -/*********************** WARNING WARNING WARNING ************************ - -Do not modify this code directly: This file was autogenerated by - - Porting/$zero - -from data contained within the script. Change the script instead. - -Generated at: @{[ scalar gmtime ]} GMT - -************************ WARNING WARNING WARNING ************************/ +/* -*- buffer-read-only: t -*- + * + * regcharclass.h + * + * Copyright (C) 2007, 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. + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by Porting/$zero. + * (Generated at: @{[ scalar gmtime ]} GMT) + * Any changes made here will be lost! + */ HEADER @@ -481,6 +484,7 @@ while (<DATA>) { } } $doit->(); +print $out_fh "/* ex: set ro: */\n"; print "$path has been updated\n"; __DATA__ diff --git a/regcharclass.h b/regcharclass.h index 08b9eaeca3..c9ffcb5058 100644 --- a/regcharclass.h +++ b/regcharclass.h @@ -1,19 +1,22 @@ -/*********************** WARNING WARNING WARNING ************************ - -Do not modify this code directly: This file was autogenerated by - - Porting/regcharclass.pl - -from data contained within the script. Change the script instead. - -Generated at: Mon Apr 23 11:33:52 2007 GMT - -************************ WARNING WARNING WARNING ************************/ +/* -*- buffer-read-only: t -*- + * + * regcharclass.h + * + * Copyright (C) 2007, 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. + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by Porting/regcharclass.pl. + * (Generated at: Mon Apr 23 12:29:30 2007 GMT) + * Any changes made here will be lost! + */ /* LNBREAK: Line Break: \R - "\x0D\x0A" # CRLF - Network (Windows) line ending + "\x0D\x0A" # CRLF - Network (Windows) line ending 0x0A # LF | LINE FEED 0x0B # VT | VERTICAL TAB 0x0C # FF | FORM FEED @@ -239,7 +242,7 @@ cp==12288 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) 0x0A # LF 0x0B # VT - 0x0C # FF + 0x0C # FF 0x0D # CR 0x85 # NEL 0x2028 # LINE SEPARATOR @@ -312,3 +315,4 @@ cp==12288 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ( cp==8232 || ( cp > 8232 && \ cp==8233 ) ) ) ) ) ) +/* ex: set ro: */ |