diff options
| author | David Mitchell <davem@iabyn.com> | 2017-10-31 23:36:40 +0000 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2017-10-31 23:36:40 +0000 |
| commit | 4ea9a11be3184157e6bb36bffecb14830c9479ac (patch) | |
| tree | e1bc656a60a2e6b082bbc4ed20e5d64643b6140a /ext/B/t | |
| parent | a385812b685b3164e706880a72ee60c9cc9573e4 (diff) | |
| download | perl-4ea9a11be3184157e6bb36bffecb14830c9479ac.tar.gz | |
fix ext/B/t/optree_samples.t
The recent OP_MULTICONCAT merge broke it under PERL_UNICODE=""
Diffstat (limited to 'ext/B/t')
| -rw-r--r-- | ext/B/t/optree_samples.t | 2 |
1 files changed, 1 insertions, 1 deletions
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 |