From a2b22270f3af59c82af647bc8a155a62b9dea494 Mon Sep 17 00:00:00 2001
From: Karl Williamson <khw@cpan.org>
Date: Wed, 3 Aug 2022 19:12:08 -0600
Subject: toke.c: Variable should be decleared Size_t, not SSize_t

---
 toke.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'toke.c')

diff --git a/toke.c b/toke.c
index b68099d422..895dd173fe 100644
--- a/toke.c
+++ b/toke.c
@@ -852,7 +852,7 @@ Perl_lex_start(pTHX_ SV *line, PerlIO *rsfp, U32 flags)
     Newxz(parser->lex_shared, 1, LEXSHARED);
 
     if (line) {
-        STRLEN len;
+        Size_t len;
         const U8* first_bad_char_loc;
 
         s = SvPV_const(line, len);
-- 
cgit v1.2.1