From 4ea9a11be3184157e6bb36bffecb14830c9479ac Mon Sep 17 00:00:00 2001
From: David Mitchell <davem@iabyn.com>
Date: Tue, 31 Oct 2017 23:36:40 +0000
Subject: fix ext/B/t/optree_samples.t

The recent OP_MULTICONCAT merge broke it under PERL_UNICODE=""
---
 ext/B/t/optree_samples.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'ext/B/t')

diff --git a/ext/B/t/optree_samples.t b/ext/B/t/optree_samples.t
index 7b63f6f141..4dbacdc92a 100644
--- a/ext/B/t/optree_samples.t
+++ b/ext/B/t/optree_samples.t
@@ -243,7 +243,7 @@ checkOptree ( name	=> '-exec sub { foreach (1..10) {print "foo $_"} }',
 # 6  <{> enteriter(next->c last->f redo->7) KS/DEF
 # d  <0> iter s
 # e  <|> and(other->7) K/1
-# 7      <;> nextstate(main 1659 optree_samples.t:234) v
+# 7      <;> nextstate(main 1659 optree_samples.t:234) v:>,<,%
 # 8      <0> pushmark s
 # 9      <#> gvsv[*_] s
 # a      <+> multiconcat("foo ",4,-1)[t5] sK/STRINGIFY
-- 
cgit v1.2.1