diff options
author | Sergey Aleynikov <sergey.aleynikov@gmail.com> | 2019-10-29 23:40:03 +0300 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2019-11-04 00:43:08 +0100 |
commit | c4b6b96d53556cbfabec85cb5114d0113c5766c8 (patch) | |
tree | aab9fe935de8b7af26923d2b4f5f74b8edac6918 /gv.c | |
parent | ece464a3ca665cd13040518e369496e6ff6c88a8 (diff) | |
download | perl-c4b6b96d53556cbfabec85cb5114d0113c5766c8.tar.gz |
Factor out common code from sv_derived_from_* subs family
into one that takes both SV*/char*+len arguments, like hv_common,
to be able to use speedups from SV* stash lookup API.
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1528,8 +1528,8 @@ Note the sv interface is strongly preferred for performance reasons. #define PERL_ARGS_ASSERT_GV_STASHSVPVN_CACHED \ assert(namesv || name) -PERL_STATIC_INLINE HV* -S_gv_stashsvpvn_cached(pTHX_ SV *namesv, const char *name, U32 namelen, I32 flags) +HV* +Perl_gv_stashsvpvn_cached(pTHX_ SV *namesv, const char *name, U32 namelen, I32 flags) { HV* stash; HE* he; |