diff options
author | Richard Leach <richardleach@users.noreply.github.com> | 2021-05-26 18:00:11 +0100 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2021-11-01 09:36:27 +1100 |
commit | 64b4056614429bb6fc7d35118e19a220459358fd (patch) | |
tree | 43fdb7787fe5ce90e1b051b7be01b278905c937c /proto.h | |
parent | 30194bf8f48620eb3926ac41c00a2bc3520c1376 (diff) | |
download | perl-64b4056614429bb6fc7d35118e19a220459358fd.tar.gz |
sv.c: add Perl_sv_grow_fresh & Perl_sv_setvpn_fresh
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -3554,6 +3554,9 @@ PERL_CALLCONV char* Perl_sv_gets(pTHX_ SV *const sv, PerlIO *const fp, I32 appen PERL_CALLCONV char* Perl_sv_grow(pTHX_ SV *const sv, STRLEN newlen); #define PERL_ARGS_ASSERT_SV_GROW \ assert(sv) +PERL_CALLCONV char* Perl_sv_grow_fresh(pTHX_ SV *const sv, STRLEN newlen); +#define PERL_ARGS_ASSERT_SV_GROW_FRESH \ + assert(sv) PERL_CALLCONV void Perl_sv_inc(pTHX_ SV *const sv); #define PERL_ARGS_ASSERT_SV_INC PERL_CALLCONV void Perl_sv_inc_nomg(pTHX_ SV *const sv); @@ -3799,6 +3802,9 @@ PERL_CALLCONV void Perl_sv_setpviv_mg(pTHX_ SV *const sv, const IV iv) PERL_CALLCONV void Perl_sv_setpvn(pTHX_ SV *const sv, const char *const ptr, const STRLEN len); #define PERL_ARGS_ASSERT_SV_SETPVN \ assert(sv) +PERL_CALLCONV void Perl_sv_setpvn_fresh(pTHX_ SV *const sv, const char *const ptr, const STRLEN len); +#define PERL_ARGS_ASSERT_SV_SETPVN_FRESH \ + assert(sv) PERL_CALLCONV void Perl_sv_setpvn_mg(pTHX_ SV *const sv, const char *const ptr, const STRLEN len); #define PERL_ARGS_ASSERT_SV_SETPVN_MG \ assert(sv); assert(ptr) |