summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorSteve Hay <SteveHay@planit.com>2005-10-31 11:30:15 +0000
committerSteve Hay <SteveHay@planit.com>2005-10-31 11:30:15 +0000
commit3a09494cf2bab4c0367a83f53debd3fa55916dfd (patch)
treeb341668805d0229350a3eddd5714d2bfcd244808 /pp_hot.c
parent91edb4ee687d28fc7146b5dbc6de5bbc9b90da2f (diff)
downloadperl-3a09494cf2bab4c0367a83f53debd3fa55916dfd.tar.gz
Fixed threaded builds following change 25916
p4raw-id: //depot/perl@25918
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_hot.c b/pp_hot.c
index bf3e229f2e..fefec9a5fb 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1610,7 +1610,7 @@ Perl_do_readline(pTHX)
const U8 *f;
if (ckWARN(WARN_UTF8) &&
- !is_utf8_string_loc(aTHX_ s, len, &f))
+ !is_utf8_string_loc(s, len, &f))
/* Emulate :encoding(utf8) warning in the same case. */
Perl_warner(aTHX_ packWARN(WARN_UTF8),
"utf8 \"\\x%02X\" does not map to Unicode",