diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-05-13 14:17:22 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-06-11 10:12:17 +0200 |
| commit | 8b09643d068d86543c3782211d4a527ee93fee77 (patch) | |
| tree | 32056686eb6f479513c1c0d5c0a05fd94ec70674 /t | |
| parent | 4de01b548a201d0dc90101ced2980c754fbf0e00 (diff) | |
| download | perl-8b09643d068d86543c3782211d4a527ee93fee77.tar.gz | |
Generate the definitions for magic vtables from data in a regen script.
Previously perl.h contained a long section of MGVTBL_SET() macros declaring
the core's various magic vtables. Convert the information into data structures
in a new script regen/mg_table.pl, and use this to generate a new file
mg_vtable.h, included by perl.h
This is the first step in reducing the number of places that data relating to
magic vtables is declared (and has to be kept in sync), and will allow more
flexibility in parts of the core's implementation.
Diffstat (limited to 't')
| -rw-r--r-- | t/porting/regen.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/porting/regen.t b/t/porting/regen.t index 78d0599660..0e052dd853 100644 --- a/t/porting/regen.t +++ b/t/porting/regen.t @@ -27,7 +27,7 @@ if ( $^O eq "VMS" ) { skip_all( "- regen.pl needs porting." ); } -my $in_regen_pl = 17; # I can't see a clean way to calculate this automatically. +my $in_regen_pl = 18; # I can't see a clean way to calculate this automatically. my @files = qw(perly.act perly.h perly.tab keywords.c keywords.h uconfig.h); my @progs = qw(Porting/makemeta regen/regcharclass.pl regen/mk_PL_charclass.pl); |