From 758215ce219dda8c05757831b73573474a3be3e0 Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Mon, 10 Jun 2024 16:20:01 -0600 Subject: [PATCH] Change formal parameter name for newSVpvn() This makes all related functions have the same-named arguments, which makes documenting them more compact --- embed.fnc | 2 +- proto.h | 2 +- sv.c | 4 ++-- 3 files changed, 4 insertions(+), 4 deletions(-) diff --git a/embed.fnc b/embed.fnc index 9432dc1dac15..3edfa2440869 100644 --- a/embed.fnc +++ b/embed.fnc @@ -2289,7 +2289,7 @@ ARdp |SV * |newSVpv |NULLOK const char * const s \ |const STRLEN len ARdfpv |SV * |newSVpvf |NN const char * const pat \ |... -ARdp |SV * |newSVpvn |NULLOK const char * const buffer \ +ARdp |SV * |newSVpvn |NULLOK const char * const s \ |const STRLEN len ARdp |SV * |newSVpvn_flags |NULLOK const char * const s \ |const STRLEN len \ diff --git a/proto.h b/proto.h index d518792cb5d0..405b04b7fb52 100644 --- a/proto.h +++ b/proto.h @@ -3037,7 +3037,7 @@ Perl_newSVpvf(pTHX_ const char * const pat, ...) assert(pat) PERL_CALLCONV SV * -Perl_newSVpvn(pTHX_ const char * const buffer, const STRLEN len) +Perl_newSVpvn(pTHX_ const char * const s, const STRLEN len) __attribute__warn_unused_result__; #define PERL_ARGS_ASSERT_NEWSVPVN diff --git a/sv.c b/sv.c index 5e0158f39e75..08c3bf55b5ec 100644 --- a/sv.c +++ b/sv.c @@ -9710,10 +9710,10 @@ undefined. */ SV * -Perl_newSVpvn(pTHX_ const char *const buffer, const STRLEN len) +Perl_newSVpvn(pTHX_ const char *const s, const STRLEN len) { SV *sv = newSV_type(SVt_PV); - sv_setpvn_fresh(sv,buffer,len); + sv_setpvn_fresh(sv, s, len); return sv; }