In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/af00134636ffe4172cbffeaed3bbad802e58d8a0?hp=3e79609f389ec31f364ad27e763e7e5f2ebc8d1e>
- Log ----------------------------------------------------------------- commit af00134636ffe4172cbffeaed3bbad802e58d8a0 Author: Steffen Mueller <[email protected]> Date: Sun Oct 10 15:43:47 2010 +0200 Move regen scripts to regen/ Moves the various scripts that are called by regen.pl to a subdirectory to reduce clutter. M MANIFEST M Porting/Maintainers.pl M Porting/exec-bit.txt M dist/Safe/t/safeops.t D embed.pl D keywords.pl D opcode.pl D overload.pl D reentr.pl D regcomp.pl M regen.pl A regen/embed.pl A regen/keywords.pl A regen/opcode.pl A regen/overload.pl A regen/reentr.pl A regen/regcomp.pl A regen/regen_lib.pl A regen/warnings.pl D regen_lib.pl D warnings.pl commit 98f8176da90af0f0d21fac5f61e6d180814b57c9 Author: Steffen Mueller <[email protected]> Date: Sun Oct 10 15:12:53 2010 +0200 Mention a few more auto-generated files in pumpkin.pod M Porting/pumpkin.pod ----------------------------------------------------------------------- Summary of changes: MANIFEST | 16 ++++++++-------- Porting/Maintainers.pl | 2 +- Porting/exec-bit.txt | 6 +++--- Porting/pumpkin.pod | 3 ++- dist/Safe/t/safeops.t | 2 +- regen.pl | 2 +- embed.pl => regen/embed.pl | 2 +- keywords.pl => regen/keywords.pl | 2 +- opcode.pl => regen/opcode.pl | 2 +- overload.pl => regen/overload.pl | 2 +- reentr.pl => regen/reentr.pl | 2 +- regcomp.pl => regen/regcomp.pl | 2 +- regen_lib.pl => regen/regen_lib.pl | 0 warnings.pl => regen/warnings.pl | 2 +- 14 files changed, 23 insertions(+), 22 deletions(-) rename embed.pl => regen/embed.pl (99%) rename keywords.pl => regen/keywords.pl (99%) rename opcode.pl => regen/opcode.pl (99%) rename overload.pl => regen/overload.pl (99%) rename reentr.pl => regen/reentr.pl (99%) rename regcomp.pl => regen/regcomp.pl (99%) rename regen_lib.pl => regen/regen_lib.pl (100%) rename warnings.pl => regen/warnings.pl (99%) diff --git a/MANIFEST b/MANIFEST index 6ce960d..8c10366 100644 --- a/MANIFEST +++ b/MANIFEST @@ -3042,7 +3042,6 @@ dquote_static.c Static functions for double quotish contexts dump.c Debugging output embed.fnc Database used by embed.pl embed.h Maps symbols to safer names -embed.pl Produces {embed,embedvar,proto}.h, global.sym embedvar.h C namespace management epoc/config.sh EPOC port config.sh template epoc/createpkg.pl EPOC port generate PKG file @@ -3549,7 +3548,6 @@ INTERN.h Included before domestic .h files intrpvar.h Variables held in each interpreter instance iperlsys.h Perl's interface to the system keywords.h The keyword numbers -keywords.pl Program to write keywords.h l1_char_class_tab.h 256 word bit table of character classes (for handy.h) lib/abbrev.pl An abbreviation table builder lib/AnyDBM_File.pm Perl module to emulate dbmopen @@ -3918,7 +3916,6 @@ nostdio.h Cause compile error on stdio calls numeric.c Miscellaneous numeric conversion routines op.c Opcode syntax tree code opcode.h Automatically generated opcode header -opcode.pl Opcode header generator op.h Opcode syntax tree header opnames.h Automatically generated opcode header op_reg_common.h Common parts of op.h, regexp.h header @@ -3983,7 +3980,6 @@ os2/perlrexx.c Support perl interpreter embedded in REXX os2/perlrexx.cmd Test perl interpreter embedded in REXX overload.c generated overload enum (public) overload.h generated overload name table (implementation) -overload.pl generate overload.h pad.c Scratchpad functions pad.h Scratchpad headers parser.h parser object header @@ -4282,15 +4278,20 @@ README.vos Perl notes for Stratus VOS README.win32 Perl notes for Windows reentr.c Reentrant interfaces reentr.h Reentrant interfaces -reentr.pl Reentrant interfaces regcharclass.h Generated by Porting/regcharclass.pl regcomp.c Regular expression compiler regcomp.h Private declarations for above -regcomp.pl Builder of regnodes.h regcomp.sym Data for regnodes.h -regen_lib.pl Common file routines for generator scripts +regen/embed.pl Produces {embed,embedvar,proto}.h, global.sym +regen/keywords.pl Program to write keywords.h +regen/opcode.pl Opcode header generator +regen/overload.pl generate overload.h regen_perly.pl generate perly.{act,h,tab} from perly.y regen.pl Run all scripts that (re)generate files +regen/reentr.pl Reentrant interfaces +regen/regcomp.pl Builder of regnodes.h +regen/regen_lib.pl Common file routines for generator scripts +regen/warnings.pl Program to write warnings.h and lib/warnings.pm regexec.c Regular expression evaluator regexp.h Public declarations for the above regnodes.h Description of nodes of RE engine @@ -4876,7 +4877,6 @@ vos/syslog.h syslog header for VOS vos/vos.c VOS emulations for missing POSIX functions vos/vosish.h VOS-specific header file warnings.h The warning numbers -warnings.pl Program to write warnings.h and lib/warnings.pm win32/bin/exetype.pl Set executable type to CONSOLE or WINDOWS win32/bin/perlglob.pl Win32 globbing win32/bin/pl2bat.pl wrap perl scripts into batch files diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index 73b02bb..93a21d1 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -1546,7 +1546,7 @@ use File::Glob qw(:case); 'warnings' => { 'MAINTAINER' => 'pmqs', - 'FILES' => q[warnings.pl + 'FILES' => q[regen/warnings.pl lib/warnings.{pm,t} lib/warnings t/lib/warnings diff --git a/Porting/exec-bit.txt b/Porting/exec-bit.txt index 269fb94..047b4bc 100644 --- a/Porting/exec-bit.txt +++ b/Porting/exec-bit.txt @@ -12,14 +12,14 @@ configure.gnu config_h.SH cpan/Test-Harness/t/source_tests/source.sh cpan/Test-Harness/t/source_tests/source_args.sh -embed.pl installperl installman -keywords.pl makeaperl.SH makedepend.SH myconfig.SH -opcode.pl +regen/embed.pl +regen/keywords.pl +regen/opcode.pl runtests.SH writemain.SH t/TEST diff --git a/Porting/pumpkin.pod b/Porting/pumpkin.pod index 9dc3ed1..c3d563e 100644 --- a/Porting/pumpkin.pod +++ b/Porting/pumpkin.pod @@ -287,7 +287,8 @@ things. =head2 Automated generation of derivative files -The F<embed.h>, F<keywords.h>, F<opcode.h>, and F<perltoc.pod> files +The F<embed.h>, F<keywords.h>, F<opcode.h>, F<regcharclass.h>, +F<l1_char_class_tab.h>, and F<perltoc.pod> files are all automatically generated by perl scripts. In general, don't patch these directly; patch the data files instead. diff --git a/dist/Safe/t/safeops.t b/dist/Safe/t/safeops.t index bd8217d..7221c21 100644 --- a/dist/Safe/t/safeops.t +++ b/dist/Safe/t/safeops.t @@ -28,7 +28,7 @@ while (<DATA>) { $code{$1} = $2; } -open my $fh, '<', '../../opcode.pl' or die "Can't open opcode.pl: $!"; +open my $fh, '<', '../../regen/opcode.pl' or die "Can't open opcode.pl: $!"; while (<$fh>) { last if /^__END__/; } diff --git a/regen.pl b/regen.pl index f103b0a..4f3be80 100644 --- a/regen.pl +++ b/regen.pl @@ -27,7 +27,7 @@ embed.pl ); my $tap = $ARGV[0] && $ARGV[0] eq '--tap' ? '# ' : ''; -foreach my $pl (@scripts) { +foreach my $pl (map {"regen/$_"} @scripts) { my @command = ($^X, $pl, @ARGV); print "$...@command\n"; system @command; diff --git a/embed.pl b/regen/embed.pl similarity index 99% rename from embed.pl rename to regen/embed.pl index 75b06ed..3aae2cd 100755 --- a/embed.pl +++ b/regen/embed.pl @@ -27,7 +27,7 @@ use strict; BEGIN { # Get function prototypes - require 'regen_lib.pl'; + require 'regen/regen_lib.pl'; } my $SPLINT = 0; # Turn true for experimental splint support http://www.splint.org diff --git a/keywords.pl b/regen/keywords.pl similarity index 99% rename from keywords.pl rename to regen/keywords.pl index 7ce010e..8a7904d 100755 --- a/keywords.pl +++ b/regen/keywords.pl @@ -12,7 +12,7 @@ use strict; -require 'regen_lib.pl'; +require 'regen/regen_lib.pl'; my $kw = safer_open("keywords.h-new"); select $kw; diff --git a/opcode.pl b/regen/opcode.pl similarity index 99% rename from opcode.pl rename to regen/opcode.pl index 46bfd95..a2d3283 100755 --- a/opcode.pl +++ b/regen/opcode.pl @@ -17,7 +17,7 @@ use strict; BEGIN { # Get function prototypes - require 'regen_lib.pl'; + require 'regen/regen_lib.pl'; } my $opcode_new = 'opcode.h-new'; diff --git a/overload.pl b/regen/overload.pl similarity index 99% rename from overload.pl rename to regen/overload.pl index 1c9a0b3..5e14531 100644 --- a/overload.pl +++ b/regen/overload.pl @@ -16,7 +16,7 @@ BEGIN { # Get function prototypes - require 'regen_lib.pl'; + require 'regen/regen_lib.pl'; } use strict; diff --git a/reentr.pl b/regen/reentr.pl similarity index 99% rename from reentr.pl rename to regen/reentr.pl index b90c61d..b432296 100644 --- a/reentr.pl +++ b/regen/reentr.pl @@ -18,7 +18,7 @@ BEGIN { # Get function prototypes - require 'regen_lib.pl'; + require 'regen/regen_lib.pl'; } use strict; diff --git a/regcomp.pl b/regen/regcomp.pl similarity index 99% rename from regcomp.pl rename to regen/regcomp.pl index f652f1c..45ec9ac 100644 --- a/regcomp.pl +++ b/regen/regcomp.pl @@ -15,7 +15,7 @@ BEGIN { # Get function prototypes - require 'regen_lib.pl'; + require 'regen/regen_lib.pl'; } #use Fatal qw(open close rename chmod unlink); use strict; diff --git a/regen_lib.pl b/regen/regen_lib.pl similarity index 100% rename from regen_lib.pl rename to regen/regen_lib.pl diff --git a/warnings.pl b/regen/warnings.pl similarity index 99% rename from warnings.pl rename to regen/warnings.pl index c201734..dfc8c6c 100644 --- a/warnings.pl +++ b/regen/warnings.pl @@ -16,7 +16,7 @@ $VERSION = '1.02_03'; BEGIN { - require 'regen_lib.pl'; + require 'regen/regen_lib.pl'; push @INC, './lib'; } use strict ; -- Perl5 Master Repository
