From de8c628c87eb5aee898aba4c43619876ab0b5a26 Mon Sep 17 00:00:00 2001 From: "Paul \"LeoNerd\" Evans" <leonerd@leonerd.org.uk> Date: Sat, 23 Nov 2024 17:48:30 +0000 Subject: [PATCH] Might as well call valid_identifier_pve() directly since we already know pv and len --- toke.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/toke.c b/toke.c index 1fc30f3780271..714c954dd5736 100644 --- a/toke.c +++ b/toke.c @@ -14028,7 +14028,7 @@ Perl_valid_identifier_sv(pTHX_ SV *sv) STRLEN len; const char *pv = SvPV_const(sv, len); - return valid_identifier_pvn(pv, len, SvUTF8(sv)); + return valid_identifier_pve(pv, pv + len, SvUTF8(sv)); } /*