diff options
author | Ben Morrow <ben@morrow.me.uk> | 2010-10-05 18:55:41 +0100 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2010-10-06 23:28:55 -0700 |
commit | ef69c8fcaa2e29961b103ed4aaf7b24d5edd9f23 (patch) | |
tree | c20362f9dff4bbd1d01abfb4347b28fe910f7ba4 /intrpvar.h | |
parent | 9ed9b795caa408a925999e1d90f9932e35b3ab10 (diff) | |
download | perl-ef69c8fcaa2e29961b103ed4aaf7b24d5edd9f23.tar.gz |
Remove MEMBER_TO_FPTR.
This is left over from PERL_OBJECT (see beeff2, 16c915, and so on).
Diffstat (limited to 'intrpvar.h')
-rw-r--r-- | intrpvar.h | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/intrpvar.h b/intrpvar.h index 4a7d867904..37ded60e12 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -192,7 +192,7 @@ convenient to wrap the L</PL_rpeepp> hook. =cut */ -PERLVARI(Ipeepp, peep_t, MEMBER_TO_FPTR(Perl_peep)) +PERLVARI(Ipeepp, peep_t, Perl_peep) /* =for apidoc Amn|peep_t|PL_rpeepp @@ -216,7 +216,7 @@ to wrap the L</PL_peepp> hook. =cut */ -PERLVARI(Irpeepp, peep_t, MEMBER_TO_FPTR(Perl_rpeep)) +PERLVARI(Irpeepp, peep_t, Perl_rpeep) /* =for apidoc Amn|Perl_ophook_t|PL_opfreehook @@ -491,7 +491,7 @@ PERLVAR(Iunicode, U32) /* Unicode features: $ENV{PERL_UNICODE} or -C */ PERLVARI(Imaxo, int, MAXO) /* maximum number of ops */ -PERLVARI(Irunops, runops_proc_t, MEMBER_TO_FPTR(RUNOPS_DEFAULT)) +PERLVARI(Irunops, runops_proc_t, RUNOPS_DEFAULT) /* =for apidoc Amn|SV|PL_sv_undef @@ -683,19 +683,19 @@ PERLVAR(Ireentrant_retint, int) /* Integer return value from reentrant functions PERLVAR(Istashcache, HV *) /* Cache to speed up S_method_common */ /* Hooks to shared SVs and locks. */ -PERLVARI(Isharehook, share_proc_t, MEMBER_TO_FPTR(Perl_sv_nosharing)) -PERLVARI(Ilockhook, share_proc_t, MEMBER_TO_FPTR(Perl_sv_nosharing)) +PERLVARI(Isharehook, share_proc_t, Perl_sv_nosharing) +PERLVARI(Ilockhook, share_proc_t, Perl_sv_nosharing) #ifdef NO_MATHOMS # define PERL_UNLOCK_HOOK Perl_sv_nosharing #else /* This reference ensures that the mathoms are linked with perl */ # define PERL_UNLOCK_HOOK Perl_sv_nounlocking #endif -PERLVARI(Iunlockhook, share_proc_t, MEMBER_TO_FPTR(PERL_UNLOCK_HOOK)) +PERLVARI(Iunlockhook, share_proc_t, PERL_UNLOCK_HOOK) -PERLVARI(Ithreadhook, thrhook_proc_t, MEMBER_TO_FPTR(Perl_nothreadhook)) +PERLVARI(Ithreadhook, thrhook_proc_t, Perl_nothreadhook) -PERLVARI(Isignalhook, despatch_signals_proc_t, MEMBER_TO_FPTR(Perl_despatch_signals)) +PERLVARI(Isignalhook, despatch_signals_proc_t, Perl_despatch_signals) PERLVARI(Ihash_seed, UV, 0) /* Hash initializer */ @@ -750,7 +750,7 @@ PERLVARI(Islab_count, U32, 0) /* Size of the array */ #endif /* Can shared object be destroyed */ -PERLVARI(Idestroyhook, destroyable_proc_t, MEMBER_TO_FPTR(Perl_sv_destroyable)) +PERLVARI(Idestroyhook, destroyable_proc_t, Perl_sv_destroyable) #ifdef DEBUG_LEAKING_SCALARS PERLVARI(Isv_serial, U32, 0) /* SV serial number, used in sv.c */ |