Fix t/comp/parser_run.t for EBCDIC

[perl5.git] / t / comp / parser_run.t

diff --git a/t/comp/parser_run.t b/t/comp/parser_run.t
index 2408fcd..79b669d 100644 (file)
--- a/t/comp/parser_run.t
+++ b/t/comp/parser_run.t
@@ -25,10 +25,10 @@ Identifier too long at - line 3.
 EXPECT
 
 fresh_perl_is(<<EOS, <<'EXPECT', {}, "linestart before bufptr");
-\${ \xD5eeeeeeeeeeee
+\${ \xB6eeeeeeeeeeee
 'x
 EOS
-Unrecognized character \xD5; marked by <-- HERE after ${ <-- HERE near column 4 at - line 1.
+Unrecognized character \xB6; marked by <-- HERE after ${ <-- HERE near column 4 at - line 1.
 EXPECT
 
 fresh_perl_is(<<'EOS', <<'EXPECTED', {}, "use after free (#131836)");