diff options
| author | Karl Berry <karl@freefriends.org> | 2012-05-21 00:15:27 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2012-05-21 00:15:27 +0000 |
| commit | a4c42bfb2337d37da89d789cb8cc226367994e32 (patch) | |
| tree | c3eabdef5d565a4e515d2be0d9d4d0540bde0250 /Master/tlpkg/tlperl/lib/CORE/perlvars.h | |
| parent | 8274475057f024d35332ac47c2e2f23ea156e6ed (diff) | |
perl 5.14.2 from siep
git-svn-id: svn://tug.org/texlive/trunk@26525 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlperl/lib/CORE/perlvars.h')
| -rw-r--r-- | Master/tlpkg/tlperl/lib/CORE/perlvars.h | 15 |
1 files changed, 6 insertions, 9 deletions
diff --git a/Master/tlpkg/tlperl/lib/CORE/perlvars.h b/Master/tlpkg/tlperl/lib/CORE/perlvars.h index 3d378917c94..1a44e22e4e9 100644 --- a/Master/tlpkg/tlperl/lib/CORE/perlvars.h +++ b/Master/tlpkg/tlperl/lib/CORE/perlvars.h @@ -12,7 +12,7 @@ =head1 Global Variables */ -/* Don't forget to re-run embed.pl to propagate changes! */ +/* Don't forget to re-run regen/embed.pl to propagate changes! */ /* This file describes the "global" variables used by perl * This used to be in perl.h directly but we want to abstract out into @@ -102,10 +102,6 @@ PERLVARA(Gsig_ignoring, SIG_SIZE, int) /* which signals we are ignoring */ PERLVARA(Gsig_defaulting, SIG_SIZE, int) #endif -#ifndef PERL_IMPLICIT_CONTEXT -PERLVAR(Gsig_sv, SV*) -#endif - /* XXX signals are process-wide anyway, so we * ignore the implications of this for threading */ #ifndef HAS_SIGACTION @@ -120,6 +116,7 @@ PERLVAR(Gwatch_pvx, char*) PERLVAR(Gppaddr, Perl_ppaddr_t*) /* or opcode.h */ PERLVAR(Gcheck, Perl_check_t *) /* or opcode.h */ PERLVARA(Gfold_locale, 256, unsigned char) /* or perl.h */ +PERLVARA(Gcharclass, 256, U32) #endif #ifdef PERL_NEED_APPCTX @@ -157,8 +154,8 @@ PERLVARI(Gveto_cleanup, int, FALSE) /* exit without cleanup */ /* dummy variables that hold pointers to both runops functions, thus forcing * them *both* to get linked in (useful for Peek.xs, debugging etc) */ -PERLVARI(Grunops_std, runops_proc_t, MEMBER_TO_FPTR(Perl_runops_standard)) -PERLVARI(Grunops_dbg, runops_proc_t, MEMBER_TO_FPTR(Perl_runops_debug)) +PERLVARI(Grunops_std, runops_proc_t, Perl_runops_standard) +PERLVARI(Grunops_dbg, runops_proc_t, Perl_runops_debug) /* These are baked at compile time into any shared perl library. @@ -212,7 +209,7 @@ introduced by the keyword. See L</Lexer interface> for details. When a keyword is being handled, the plugin function must build a tree of C<OP> structures, representing the code that was parsed. The root of the tree must be stored in C<*op_ptr>. The function then -returns a contant indicating the syntactic role of the construct that +returns a constant indicating the syntactic role of the construct that it has parsed: C<KEYWORD_PLUGIN_STMT> if it is a complete statement, or C<KEYWORD_PLUGIN_EXPR> if it is an expression. Note that a statement construct cannot be used inside an expression (except via C<do BLOCK> @@ -240,4 +237,4 @@ the Perl core) will normally return C<KEYWORD_PLUGIN_DECLINE>. =cut */ -PERLVARI(Gkeyword_plugin, Perl_keyword_plugin_t, MEMBER_TO_FPTR(Perl_keyword_plugin_standard)) +PERLVARI(Gkeyword_plugin, Perl_keyword_plugin_t, Perl_keyword_plugin_standard) |