From bc6e83cef73b32e723480519dd4fae9d43b46be5 Mon Sep 17 00:00:00 2001
From: James E Keenan <jkeenan@cpan.org>
Date: Sun, 20 Aug 2023 20:45:40 -0400
Subject: [PATCH] Suppress -Wunused_variable warning during 'make'

Implement Dave Mitchell's suggestion: we don't really need the unused
variable.

For: https://github.com/Perl/perl5/issues/21393
---
 pp_ctl.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/pp_ctl.c b/pp_ctl.c
index 49a49636caa6..961768a9d9a5 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -4451,9 +4451,8 @@ S_require_file(pTHX_ SV *sv)
         SAVETMPS;
         PUSHMARK(PL_stack_sp);
         rpp_xpush_1(name_sv); /* always use the object for method calls */
-        int count = call_sv(PL_hook__require__before, G_SCALAR);
+        call_sv(PL_hook__require__before, G_SCALAR);
         SV *rsv = *PL_stack_sp;
-        assert(count == 1); /* scalar context */
         if (SvOK(rsv) && SvROK(rsv) && SvTYPE(SvRV(rsv)) == SVt_PVCV) {
             /* the RC++ preserves it across the popping and/or FREETMPS
              * below */