diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2007-05-25 23:26:33 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2007-05-25 23:26:33 +0000 |
| commit | 4b8f2e61a9bd693bb1aedb3127f6c5d2e1d8c5dc (patch) | |
| tree | 95bc8902ed80328d670b356902a38c0e46e89344 /perlvars.h | |
| parent | cbb8049cc02620a27212e2f0f3efd2cea8b73cea (diff) | |
| download | perl-4b8f2e61a9bd693bb1aedb3127f6c5d2e1d8c5dc.tar.gz | |
delete PL_hash_seed_set, PL_lineary; move PL_runops_std/dbg
the first two aren't used, and the last two are just place holders
to ensure that both runops functions get linked in; so make them
global rather than per-interpeter
p4raw-id: //depot/perl@31280
Diffstat (limited to 'perlvars.h')
| -rw-r--r-- | perlvars.h | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/perlvars.h b/perlvars.h index cd88e071f1..ee76ebc138 100644 --- a/perlvars.h +++ b/perlvars.h @@ -154,3 +154,9 @@ PERLVAR(Gperlio_mutex, perl_mutex) /* Mutex for perlio fd refcounts */ * can be set atomically (ie not a bit field) */ 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)) + |