diff options
author | Nicholas Clark <nick@ccl4.org> | 2013-02-19 19:47:14 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2013-02-19 19:47:14 +0100 |
commit | d399cf59bde32e412ae99791ae46a871c7337b42 (patch) | |
tree | d380f8b298586831c1a05b490b6d8a21dd01f7b2 | |
parent | e914d9bb761c46152f77ac90b434b263b133fcbc (diff) | |
download | perl-d399cf59bde32e412ae99791ae46a871c7337b42.tar.gz |
Rename PL_interp_size_5_16_0 to PL_interp_size_5_18_0.
-rw-r--r-- | globvar.sym | 2 | ||||
-rw-r--r-- | intrpvar.h | 4 | ||||
-rw-r--r-- | makedef.pl | 2 | ||||
-rw-r--r-- | perl.h | 4 |
4 files changed, 6 insertions, 6 deletions
diff --git a/globvar.sym b/globvar.sym index 93eca43ea1..8401f21e53 100644 --- a/globvar.sym +++ b/globvar.sym @@ -16,7 +16,7 @@ freq global_struct_size hexdigit interp_size -interp_size_5_16_0 +interp_size_5_18_0 keyword_plugin latin1_lc magic_data diff --git a/intrpvar.h b/intrpvar.h index 8a2c66426d..852f9a0466 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -722,11 +722,11 @@ PERLVAR(I, custom_ops, HV *) /* custom op registrations */ /* Hook for File::Glob */ PERLVARI(I, globhook, globhook_t, NULL) -/* The last unconditional member of the interpreter structure when 5.10.0 was +/* The last unconditional member of the interpreter structure when 5.18.0 was released. The offset of the end of this is baked into a global variable in any shared perl library which will allow a sanity test in future perl releases. */ -#define PERL_LAST_5_16_0_INTERP_MEMBER Iglobhook +#define PERL_LAST_5_18_0_INTERP_MEMBER Iglobhook #ifdef PERL_IMPLICIT_CONTEXT PERLVARI(I, my_cxt_list, void **, NULL) /* per-module array of MY_CXT pointers */ diff --git a/makedef.pl b/makedef.pl index 6c1b8f3c32..eefbbe4fa6 100644 --- a/makedef.pl +++ b/makedef.pl @@ -452,7 +452,7 @@ unless ($define{PERL_MAD}) { unless ($define{'MULTIPLICITY'}) { ++$skip{$_} foreach qw( PL_interp_size - PL_interp_size_5_16_0 + PL_interp_size_5_18_0 ); } @@ -5027,8 +5027,8 @@ EXTCONST U16 PL_interp_size /* This will be useful for subsequent releases, because this has to be the same in your libperl as in main(), else you have a mismatch and must abort. */ -EXTCONST U16 PL_interp_size_5_16_0 - INIT(PERL_INTERPRETER_SIZE_UPTO_MEMBER(PERL_LAST_5_16_0_INTERP_MEMBER)); +EXTCONST U16 PL_interp_size_5_18_0 + INIT(PERL_INTERPRETER_SIZE_UPTO_MEMBER(PERL_LAST_5_18_0_INTERP_MEMBER)); # ifdef PERL_GLOBAL_STRUCT |