diff options
author | Karl Williamson <khw@cpan.org> | 2022-05-07 10:53:18 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2022-05-07 11:17:13 -0600 |
commit | 511c9a03bd39514f41213fb53c3a08f4bee57163 (patch) | |
tree | 59341cbbbef0c3c7541708d4bc81dc46fe75ca24 | |
parent | f6bb4abfa28778c55b6f2ec98c1537b11c3f3e5f (diff) | |
download | perl-511c9a03bd39514f41213fb53c3a08f4bee57163.tar.gz |
Mark internal and document sv_peek
-rw-r--r-- | dump.c | 8 | ||||
-rw-r--r-- | embed.fnc | 2 |
2 files changed, 9 insertions, 1 deletions
@@ -390,6 +390,14 @@ Perl_pv_display(pTHX_ SV *dsv, const char *pv, STRLEN cur, STRLEN len, STRLEN pv return _pv_display_flags(aTHX_ dsv, pv, cur, len, pvlim, 0); } +/* +=for apidoc sv_peek + +Implements C<SvPEEK> + +=cut +*/ + char * Perl_sv_peek(pTHX_ SV *sv) { @@ -1896,7 +1896,7 @@ ApdR |SV* |sv_newmortal Cpd |SV* |sv_newref |NULLOK SV *const sv Amd |bool |sv_numeq |NULLOK SV* sv1|NULLOK SV* sv2 Apd |bool |sv_numeq_flags |NULLOK SV* sv1|NULLOK SV* sv2|const U32 flags -Ap |char* |sv_peek |NULLOK SV* sv +Cpd |char* |sv_peek |NULLOK SV* sv Apd |void |sv_pos_u2b |NULLOK SV *const sv|NN I32 *const offsetp|NULLOK I32 *const lenp Apd |STRLEN |sv_pos_u2b_flags|NN SV *const sv|STRLEN uoffset \ |NULLOK STRLEN *const lenp|U32 flags |