diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-01-05 11:43:58 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-01-05 12:40:28 +0000 |
| commit | d682515ddb57d53757782d63f41bfeee5275187b (patch) | |
| tree | ee747e83d315900348c25dd25bad6b0fe2a35cfc /embed.h | |
| parent | 268389f04944215f5457046f5f3044c86057eed4 (diff) | |
| download | perl-d682515ddb57d53757782d63f41bfeee5275187b.tar.gz | |
Rename tied_handle_method() to tied_method(), and make it non-static.
It can be used for (at least) the call to "SPLICE" from pp_splice.
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -1480,6 +1480,9 @@ #define sv_clean_objs() Perl_sv_clean_objs(aTHX) #define sv_del_backref(a,b) Perl_sv_del_backref(aTHX_ a,b) #define sv_free_arenas() Perl_sv_free_arenas(aTHX) +#ifndef PERL_IMPLICIT_CONTEXT +#define tied_method Perl_tied_method +#endif #define unshare_hek(a) Perl_unshare_hek(aTHX_ a) #define vivify_ref(a,b) Perl_vivify_ref(aTHX_ a,b) #define wait4pid(a,b,c) Perl_wait4pid(aTHX_ a,b,c) |