From 09fbd16e8a0e26ef4ac3790a6f67ec8dbdaa8720 Mon Sep 17 00:00:00 2001
From: Richard Leach <richardleach@users.noreply.github.com>
Date: Fri, 10 Feb 2023 21:58:29 +0000
Subject: S_do_chomp: remove unused svrecode SV

---
 pp.c | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

(limited to 'pp.c')

diff --git a/pp.c b/pp.c
index d15db834e3..e2a70151b3 100644
--- a/pp.c
+++ b/pp.c
@@ -738,7 +738,6 @@ S_do_chomp(pTHX_ SV *retval, SV *sv, bool chomping)
     if (chomping) {
         if (s && len) {
             char *temp_buffer = NULL;
-            SV *svrecode = NULL;
             s += --len;
             if (RsPARA(PL_rs)) {
                 if (*s != '\n')
@@ -771,7 +770,7 @@ S_do_chomp(pTHX_ SV *retval, SV *sv, bool chomping)
                                is the buffer inside PL_rs, so don't free it.
                              */
                             assert (temp_buffer == rsptr);
-                            goto nope_free_sv;
+                            goto nope_free_nothing;
                         }
                         rsptr = temp_buffer;
                     }
@@ -804,8 +803,6 @@ S_do_chomp(pTHX_ SV *retval, SV *sv, bool chomping)
 
             nope_free_all:
             Safefree(temp_buffer);
-            nope_free_sv:
-            SvREFCNT_dec(svrecode);
             nope_free_nothing: ;
         }
     } else {
-- 
cgit v1.2.1