From 0ca835f6a623d95f378cb509131a818551586691 Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Tue, 5 Nov 2013 15:47:30 -0800 Subject: [PATCH] toke.c: Remove unnecessary UTF check In this particular branch, the value of PL_tokenbuf will always be a built-in keyword; i.e., pure ASCII. So there is no need to do a utf8 check. --- toke.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/toke.c b/toke.c index c19b446..b42929e 100644 --- a/toke.c +++ b/toke.c @@ -7146,7 +7146,7 @@ Perl_yylex(pTHX) } if (!ogv && (gvp = (GV**)hv_fetch(PL_globalstash, PL_tokenbuf, - UTF ? -(I32)len : (I32)len, FALSE)) && + len, FALSE)) && (gv = *gvp) && ( isGV_with_GP(gv) ? GvCVu(gv) && GvIMPORTED_CV(gv) -- 2.7.4