diff options
author | Nicholas Clark <nick@ccl4.org> | 2010-08-20 15:31:42 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2010-08-20 17:34:39 +0100 |
commit | 1e30fcd5eb66123dc2adb29941506280426aefaf (patch) | |
tree | d378d52daafa08bea562d175532be388a310f7a4 /embed.fnc | |
parent | 029821316c3d1268a765152507ac4ffb64746558 (diff) | |
download | perl-1e30fcd5eb66123dc2adb29941506280426aefaf.tar.gz |
Expose more_bodies(), and use it to replace S_more_he().
Convert get_arena() to be static, as now its only user is Perl_more_bodies().
Perl_get_arena() was not in the public API, and neither Google codesearch
nor an upacked CPAN show anything to be using it.
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 8 |
1 files changed, 2 insertions, 6 deletions
@@ -1494,11 +1494,6 @@ s |HV* |require_tie_mod|NN GV *gv|NN const char *varpv|NN SV* namesv \ |NN const char *methpv|const U32 flags #endif -: #if defined(PERL_IN_HV_C) || defined(PERL_IN_SV_C) -: Used in hv.c -paRxoM |void* |get_arena |const size_t arenasize |const svtype bodytype -: #endif - #if defined(PERL_IN_HV_C) s |void |hsplit |NN HV *hv s |void |hfreeentries |NN HV *hv @@ -1907,7 +1902,8 @@ sn |char * |F0convert |NV nv|NN char *const endbuf|NN STRLEN *const len sM |void |sv_release_COW |NN SV *sv|NN const char *pvx|NN SV *after # endif s |SV * |more_sv -s |void * |more_bodies |const svtype sv_type|const size_t body_size \ +: Used in sv.c and hv.c +po |void * |more_bodies |const svtype sv_type|const size_t body_size \ |const size_t arena_size s |bool |sv_2iuv_common |NN SV *const sv s |void |glob_assign_glob|NN SV *const dstr|NN SV *const sstr \ |