Skip to content

Instantly share code, notes, and snippets.

@exodist

exodist/gist:f60ea9c1a30b86858c3d

Created January 23, 2016 20:37
Show Gist options
  • Save exodist/f60ea9c1a30b86858c3d to your computer and use it in GitHub Desktop.
Save exodist/f60ea9c1a30b86858c3d to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
../ext/B/t/optree_specials.t .. 1/15 # Failed test 3 - BEGIN at t/optree_specials.t line 37
# got 'BEGIN 1:
# a <1> leavesub[1 ref] K/REFC,1 ->(end)
# - <@> lineseq K ->a
# 1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$ ->2
# 3 <1> require sK/1 ->4
# 2 <$> const[PV "strict.pm"] s/BARE ->3
# - <;> ex-nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$ ->4
# - <@> lineseq K ->-
# 4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$ ->5
# 9 <1> entersub[t1] KS*/TARG,STRICT ->a
# 5 <0> pushmark s ->6
# 6 <$> const[PV "strict"] sM ->7
# 7 <$> const[PV "refs"] sM ->8
# 8 <.> method_named[PV "unimport"] ->9
# BEGIN 2:
# k <1> leavesub[1 ref] K/REFC,1 ->(end)
# - <@> lineseq KP ->k
# b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$ ->c
# d <1> require sK/1 ->e
# c <$> const[PV "strict.pm"] s/BARE ->d
# - <;> ex-nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$ ->e
# - <@> lineseq K ->-
# e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$ ->f
# j <1> entersub[t1] KS*/TARG,STRICT ->k
# f <0> pushmark s ->g
# g <$> const[PV "strict"] sM ->h
# h <$> const[PV "refs"] sM ->i
# i <.> method_named[PV "unimport"] ->j
# BEGIN 3:
# u <1> leavesub[1 ref] K/REFC,1 ->(end)
# - <@> lineseq K ->u
# l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$ ->m
# n <1> require sK/1 ->o
# m <$> const[PV "strict.pm"] s/BARE ->n
# - <;> ex-nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$ ->o
# - <@> lineseq K ->-
# o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$ ->p
# t <1> entersub[t1] KS*/TARG,STRICT ->u
# p <0> pushmark s ->q
# q <$> const[PV "strict"] sM ->r
# r <$> const[PV "refs"] sM ->s
# s <.> method_named[PV "unimport"] ->t
# BEGIN 4:
# 14 <1> leavesub[1 ref] K/REFC,1 ->(end)
# - <@> lineseq KP ->14
# v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$ ->w
# x <1> require sK/1 ->y
# w <$> const[PV "warnings.pm"] s/BARE ->x
# - <;> ex-nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$ ->y
# - <@> lineseq K ->-
# y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$ ->z
# 13 <1> entersub[t1] KS*/TARG,STRICT ->14
# z <0> pushmark s ->10
# 10 <$> const[PV "warnings"] sM ->11
# 11 <$> const[PV "qw"] sM ->12
# 12 <.> method_named[PV "unimport"] ->13
# BEGIN 5:
# 18 <1> leavesub[1 ref] K/REFC,1 ->(end)
# - <@> lineseq KP ->18
# 15 <;> nextstate(main 3 -e:1) v:{ ->16
# 17 <1> postinc[t3] sK/1 ->18
# - <1> ex-rv2sv sKRM/1 ->17
# 16 <#> gvsv[*beg] s ->17
# '
# expected /(?^ms:^BEGIN 1:
# a <1> leavesub\[\d+ refs?\] K/REFC,1 ->\(end\)
# - <\@> lineseq KP ->a
# 1 <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$ ->2
# 3 <1> require sK/1 ->4
# 2 <\$> const\[PV ".*?"\] s/BARE ->3
# - <;> ex-(?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$ ->4
# - <\@> lineseq K ->-
# 4 <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$ ->5
# 9 <1> entersub\[t\d+\] KS\*/TARG,STRICT ->a
# 5 <0> pushmark s ->6
# 6 <\$> const\[PV ".*?"\] sM ->7
# 7 <\$> const\[PV ".*?"\] sM ->8
# 8 <\.> method_named\[PV ".*?"\] ->9
# BEGIN 2:
# k <1> leavesub\[\d+ refs?\] K/REFC,1 ->\(end\)
# - <\@> lineseq K ->k
# b <;> (?:next|db)state\([^()]*?\) v:\*,&,x\*,x&,x\$,\$ ->c
# d <1> require sK/1 ->e
# c <\$> const\[PV ".*?"\] s/BARE ->d
# - <;> ex-(?:next|db)state\([^()]*?\) v:\*,&,x\*,x&,x\$,\$ ->e
# - <\@> lineseq K ->-
# e <;> (?:next|db)state\([^()]*?\) :\*,&,x\*,x&,x\$,\$ ->f
# j <1> entersub\[t\d+\] KS\*/TARG,STRICT ->k
# f <0> pushmark s ->g
# g <\$> const\[PV ".*?"\] sM ->h
# h <\$> const\[PV ".*?"\] sM ->i
# i <\.> method_named\[PV ".*?"\] ->j
# BEGIN 3:
# u <1> leavesub\[\d+ refs?\] K/REFC,1 ->\(end\)
# - <\@> lineseq KP ->u
# l <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$ ->m
# n <1> require sK/1 ->o
# m <\$> const\[PV ".*?"\] s/BARE ->n
# - <;> ex-(?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$ ->o
# - <\@> lineseq K ->-
# o <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$ ->p
# t <1> entersub\[t\d+\] KS\*/TARG,STRICT ->u
# p <0> pushmark s ->q
# q <\$> const\[PV ".*?"\] sM ->r
# r <\$> const\[PV ".*?"\] sM ->s
# s <\.> method_named\[PV ".*?"\] ->t
# BEGIN 4:
# y <1> leavesub\[\d+ refs?\] K/REFC,1 ->\(end\)
# - <\@> lineseq KP ->y
# v <;> (?:next|db)state\([^()]*?\) v:{ ->w
# x <1> postinc\[t\d+\] sK/1 ->y
# - <1> ex-rv2sv sKRM/1 ->x
# w <\#> gvsv\[\*beg\] s ->x
# $)/
# got: '- <@> lineseq K ->a'
# want: (?^:- <\@> lineseq KP ->a)
# got: '1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$ ->2'
# want: (?^:1 <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$ ->2)
# got: '- <;> ex-nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$ ->4'
# want: (?^:- <;> ex-(?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$ ->4)
# got: '4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$ ->5'
# want: (?^:4 <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$ ->5)
# got: '- <@> lineseq KP ->k'
# want: (?^:- <\@> lineseq K ->k)
# got: 'b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$ ->c'
# want: (?^:b <;> (?:next|db)state\([^()]*?\) v:\*,&,x\*,x&,x\$,\$ ->c)
# got: '- <;> ex-nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$ ->e'
# want: (?^:- <;> ex-(?:next|db)state\([^()]*?\) v:\*,&,x\*,x&,x\$,\$ ->e)
# got: '- <@> lineseq K ->-'
# want: (?^:- <\@> lineseq K ->-)
# got: 'e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$ ->f'
# want: (?^:e <;> (?:next|db)state\([^()]*?\) :\*,&,x\*,x&,x\$,\$ ->f)
# got: '- <@> lineseq K ->u'
# want: (?^:- <\@> lineseq KP ->u)
# got: 'l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$ ->m'
# want: (?^:l <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$ ->m)
# got: '- <;> ex-nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$ ->o'
# want: (?^:- <;> ex-(?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$ ->o)
# got: '- <@> lineseq K ->-'
# want: (?^:- <\@> lineseq K ->-)
# got: 'o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$ ->p'
# want: (?^:o <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$ ->p)
# got: '14 <1> leavesub[1 ref] K/REFC,1 ->(end)'
# want: (?^:y <1> leavesub\[\d+ refs?\] K/REFC,1 ->\(end\))
# got: '- <@> lineseq KP ->14'
# want: (?^:- <\@> lineseq KP ->y)
# got: 'v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$ ->w'
# want: (?^:v <;> (?:next|db)state\([^()]*?\) v:{ ->w)
# got: 'x <1> require sK/1 ->y'
# want: (?^:x <1> postinc\[t\d+\] sK/1 ->y)
# got: 'w <$> const[PV "warnings.pm"] s/BARE ->x'
# want: (?^:- <1> ex-rv2sv sKRM/1 ->x)
# got: '- <;> ex-nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$ ->y'
# want: (?^:w <\#> gvsv\[\*beg\] s ->x)
# remainder:
# - <@> lineseq K ->a
# 1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$ ->2
# - <;> ex-nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$ ->4
# 4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$ ->5
# - <@> lineseq KP ->k
# b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$ ->c
# - <;> ex-nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$ ->e
# e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$ ->f
# - <@> lineseq K ->u
# l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$ ->m
# - <;> ex-nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$ ->o
# o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$ ->p
# 14 <1> leavesub[1 ref] K/REFC,1 ->(end)
# - <@> lineseq KP ->14
# v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$ ->w
# x <1> require sK/1 ->y
# w <$> const[PV "warnings.pm"] s/BARE ->x
# - <;> ex-nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$ ->y
# y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$ ->z
# 13 <1> entersub[t1] KS*/TARG,STRICT ->14
# z <0> pushmark s ->10
# 10 <$> const[PV "warnings"] sM ->11
# 11 <$> const[PV "qw"] sM ->12
# 12 <.> method_named[PV "unimport"] ->13
# BEGIN 5:
# 18 <1> leavesub[1 ref] K/REFC,1 ->(end)
# - <@> lineseq KP ->18
# 15 <;> nextstate(main 3 -e:1) v:{ ->16
# 17 <1> postinc[t3] sK/1 ->18
# - <1> ex-rv2sv sKRM/1 ->17
# 16 <#> gvsv[*beg] s ->17
# these lines not matched:
# - <@> lineseq K ->a
# 1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$ ->2
# - <;> ex-nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$ ->4
# 4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$ ->5
# - <@> lineseq KP ->k
# b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$ ->c
# - <;> ex-nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$ ->e
# e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$ ->f
# - <@> lineseq K ->u
# l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$ ->m
# - <;> ex-nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$ ->o
# o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$ ->p
# 14 <1> leavesub[1 ref] K/REFC,1 ->(end)
# - <@> lineseq KP ->14
# v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$ ->w
# x <1> require sK/1 ->y
# w <$> const[PV "warnings.pm"] s/BARE ->x
# - <;> ex-nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$ ->y
# y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$ ->z
# 13 <1> entersub[t1] KS*/TARG,STRICT ->14
# z <0> pushmark s ->10
# 10 <$> const[PV "warnings"] sM ->11
# 11 <$> const[PV "qw"] sM ->12
# 12 <.> method_named[PV "unimport"] ->13
# BEGIN 5:
# 18 <1> leavesub[1 ref] K/REFC,1 ->(end)
# - <@> lineseq KP ->18
# 15 <;> nextstate(main 3 -e:1) v:{ ->16
# 17 <1> postinc[t3] sK/1 ->18
# - <1> ex-rv2sv sKRM/1 ->17
# 16 <#> gvsv[*beg] s ->17
../ext/B/t/optree_specials.t .. 2/15 # Failed test 13 - all of BEGIN END INIT CHECK UNITCHECK -exec at t/optree_specials.t line 235
# got 'BEGIN 1:
# 1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$
# 2 <$> const[PV "strict.pm"] s/BARE
# 3 <1> require sK/1
# 4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$
# 5 <0> pushmark s
# 6 <$> const[PV "strict"] sM
# 7 <$> const[PV "refs"] sM
# 8 <.> method_named[PV "unimport"]
# 9 <1> entersub[t1] KS*/TARG,STRICT
# a <1> leavesub[1 ref] K/REFC,1
# BEGIN 2:
# b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$
# c <$> const[PV "strict.pm"] s/BARE
# d <1> require sK/1
# e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$
# f <0> pushmark s
# g <$> const[PV "strict"] sM
# h <$> const[PV "refs"] sM
# i <.> method_named[PV "unimport"]
# j <1> entersub[t1] KS*/TARG,STRICT
# k <1> leavesub[1 ref] K/REFC,1
# BEGIN 3:
# l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$
# m <$> const[PV "strict.pm"] s/BARE
# n <1> require sK/1
# o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$
# p <0> pushmark s
# q <$> const[PV "strict"] sM
# r <$> const[PV "refs"] sM
# s <.> method_named[PV "unimport"]
# t <1> entersub[t1] KS*/TARG,STRICT
# u <1> leavesub[1 ref] K/REFC,1
# BEGIN 4:
# v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$
# w <$> const[PV "warnings.pm"] s/BARE
# x <1> require sK/1
# y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$
# z <0> pushmark s
# 10 <$> const[PV "warnings"] sM
# 11 <$> const[PV "qw"] sM
# 12 <.> method_named[PV "unimport"]
# 13 <1> entersub[t1] KS*/TARG,STRICT
# 14 <1> leavesub[1 ref] K/REFC,1
# BEGIN 5:
# 15 <;> nextstate(main 3 -e:1) v:{
# 16 <#> gvsv[*beg] s
# 17 <1> postinc[t3] sK/1
# 18 <1> leavesub[1 ref] K/REFC,1
# END 1:
# 19 <;> nextstate(main 9 -e:1) v:{
# 1a <#> gvsv[*end] s
# 1b <1> postinc[t3] sK/1
# 1c <1> leavesub[1 ref] K/REFC,1
# INIT 1:
# 1d <;> nextstate(main 7 -e:1) v:{
# 1e <#> gvsv[*init] s
# 1f <1> postinc[t3] sK/1
# 1g <1> leavesub[1 ref] K/REFC,1
# CHECK 1:
# 1h <;> nextstate(main 5 -e:1) v:{
# 1i <#> gvsv[*chk] s
# 1j <1> postinc[t3] sK/1
# 1k <1> leavesub[1 ref] K/REFC,1
# UNITCHECK 1:
# 1l <;> nextstate(main 11 -e:1) v:{
# 1m <#> gvsv[*uc] s
# 1n <1> postinc[t3] sK/1
# 1o <1> leavesub[1 ref] K/REFC,1
# '
# expected /(?^ms:^BEGIN 1:
# 1 <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$
# 2 <\$> const\[PV ".*?"\] s/BARE
# 3 <1> require sK/1
# 4 <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$
# 5 <0> pushmark s
# 6 <\$> const\[PV ".*?"\] sM
# 7 <\$> const\[PV ".*?"\] sM
# 8 <\.> method_named\[PV ".*?"\]
# 9 <1> entersub\[t\d+\] KS\*/TARG,STRICT
# a <1> leavesub\[\d+ refs?\] K/REFC,1
# BEGIN 2:
# b <;> (?:next|db)state\([^()]*?\) v:\*,&,x\*,x&,x\$,\$
# c <\$> const\[PV ".*?"\] s/BARE
# d <1> require sK/1
# e <;> (?:next|db)state\([^()]*?\) :\*,&,x\*,x&,x\$,\$
# f <0> pushmark s
# g <\$> const\[PV ".*?"\] sM
# h <\$> const\[PV ".*?"\] sM
# i <\.> method_named\[PV ".*?"\]
# j <1> entersub\[t\d+\] KS\*/TARG,STRICT
# k <1> leavesub\[\d+ refs?\] K/REFC,1
# BEGIN 3:
# l <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$
# m <\$> const\[PV ".*?"\] s/BARE
# n <1> require sK/1
# o <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$
# p <0> pushmark s
# q <\$> const\[PV ".*?"\] sM
# r <\$> const\[PV ".*?"\] sM
# s <\.> method_named\[PV ".*?"\]
# t <1> entersub\[t\d+\] KS\*/TARG,STRICT
# u <1> leavesub\[\d+ refs?\] K/REFC,1
# BEGIN 4:
# v <;> (?:next|db)state\([^()]*?\) v:{
# w <\#> gvsv\[\*beg\] s
# x <1> postinc\[t\d+\] sK/1
# y <1> leavesub\[\d+ refs?\] K/REFC,1
# END 1:
# z <;> (?:next|db)state\([^()]*?\) v:{
# 10 <\#> gvsv\[\*end\] s
# 11 <1> postinc\[t\d+\] sK/1
# 12 <1> leavesub\[\d+ refs?\] K/REFC,1
# INIT 1:
# 13 <;> (?:next|db)state\([^()]*?\) v:{
# 14 <\#> gvsv\[\*init\] s
# 15 <1> postinc\[t\d+\] sK/1
# 16 <1> leavesub\[\d+ refs?\] K/REFC,1
# CHECK 1:
# 17 <;> (?:next|db)state\([^()]*?\) v:{
# 18 <\#> gvsv\[\*chk\] s
# 19 <1> postinc\[t\d+\] sK/1
# 1a <1> leavesub\[\d+ refs?\] K/REFC,1
# UNITCHECK 1:
# 1b <;> (?:next|db)state\([^()]*?\) v:{
# 1c <\#> gvsv\[\*uc\] s
# 1d <1> postinc\[t\d+\] sK/1
# 1e <1> leavesub\[\d+ refs?\] K/REFC,1
# $)/
# got: '1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$'
# want: (?^:1 <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$)
# got: '4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$'
# want: (?^:4 <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$)
# got: 'b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$'
# want: (?^:b <;> (?:next|db)state\([^()]*?\) v:\*,&,x\*,x&,x\$,\$)
# got: 'e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$'
# want: (?^:e <;> (?:next|db)state\([^()]*?\) :\*,&,x\*,x&,x\$,\$)
# got: 'l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$'
# want: (?^:l <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$)
# got: 'o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$'
# want: (?^:o <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$)
# got: 'v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$'
# want: (?^:v <;> (?:next|db)state\([^()]*?\) v:{)
# got: 'w <$> const[PV "warnings.pm"] s/BARE'
# want: (?^:w <\#> gvsv\[\*beg\] s)
# got: 'x <1> require sK/1'
# want: (?^:x <1> postinc\[t\d+\] sK/1)
# got: 'y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$'
# want: (?^:y <1> leavesub\[\d+ refs?\] K/REFC,1)
# got: '10 <$> const[PV "warnings"] sM'
# want: (?^:z <;> (?:next|db)state\([^()]*?\) v:{)
# got: '11 <$> const[PV "qw"] sM'
# want: (?^:10 <\#> gvsv\[\*end\] s)
# got: '12 <.> method_named[PV "unimport"] '
# want: (?^:11 <1> postinc\[t\d+\] sK/1)
# got: '13 <1> entersub[t1] KS*/TARG,STRICT'
# want: (?^:12 <1> leavesub\[\d+ refs?\] K/REFC,1)
# got: 'BEGIN 5:'
# want: (?^:13 <;> (?:next|db)state\([^()]*?\) v:{)
# got: '15 <;> nextstate(main 3 -e:1) v:{'
# want: (?^:14 <\#> gvsv\[\*init\] s)
# got: '16 <#> gvsv[*beg] s'
# want: (?^:15 <1> postinc\[t\d+\] sK/1)
# got: '17 <1> postinc[t3] sK/1'
# want: (?^:16 <1> leavesub\[\d+ refs?\] K/REFC,1)
# got: 'END 1:'
# want: (?^:17 <;> (?:next|db)state\([^()]*?\) v:{)
# got: '19 <;> nextstate(main 9 -e:1) v:{'
# want: (?^:18 <\#> gvsv\[\*chk\] s)
# got: '1a <#> gvsv[*end] s'
# want: (?^:19 <1> postinc\[t\d+\] sK/1)
# got: '1b <1> postinc[t3] sK/1'
# want: (?^:1a <1> leavesub\[\d+ refs?\] K/REFC,1)
# got: '1c <1> leavesub[1 ref] K/REFC,1'
# want: (?^:UNITCHECK 1:)
# got: 'INIT 1:'
# want: (?^:1b <;> (?:next|db)state\([^()]*?\) v:{)
# got: '1d <;> nextstate(main 7 -e:1) v:{'
# want: (?^:1c <\#> gvsv\[\*uc\] s)
# got: '1e <#> gvsv[*init] s'
# want: (?^:1d <1> postinc\[t\d+\] sK/1)
# got: '1f <1> postinc[t3] sK/1'
# want: (?^:1e <1> leavesub\[\d+ refs?\] K/REFC,1)
# remainder:
# 1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$
# 4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$
# b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$
# e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$
# l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$
# o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$
# v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$
# w <$> const[PV "warnings.pm"] s/BARE
# x <1> require sK/1
# y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$
# z <0> pushmark s
# 10 <$> const[PV "warnings"] sM
# 11 <$> const[PV "qw"] sM
# 12 <.> method_named[PV "unimport"]
# 13 <1> entersub[t1] KS*/TARG,STRICT
# 14 <1> leavesub[1 ref] K/REFC,1
# BEGIN 5:
# 15 <;> nextstate(main 3 -e:1) v:{
# 16 <#> gvsv[*beg] s
# 17 <1> postinc[t3] sK/1
# 18 <1> leavesub[1 ref] K/REFC,1
# 19 <;> nextstate(main 9 -e:1) v:{
# 1a <#> gvsv[*end] s
# 1b <1> postinc[t3] sK/1
# 1c <1> leavesub[1 ref] K/REFC,1
# 1d <;> nextstate(main 7 -e:1) v:{
# 1e <#> gvsv[*init] s
# 1f <1> postinc[t3] sK/1
# 1g <1> leavesub[1 ref] K/REFC,1
# 1h <;> nextstate(main 5 -e:1) v:{
# 1i <#> gvsv[*chk] s
# 1j <1> postinc[t3] sK/1
# 1k <1> leavesub[1 ref] K/REFC,1
# UNIT1l <;> nextstate(main 11 -e:1) v:{
# 1m <#> gvsv[*uc] s
# 1n <1> postinc[t3] sK/1
# 1o <1> leavesub[1 ref] K/REFC,1
# these lines not matched:
# 1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$
# 4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$
# b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$
# e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$
# l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$
# o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$
# v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$
# w <$> const[PV "warnings.pm"] s/BARE
# x <1> require sK/1
# y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$
# z <0> pushmark s
# 10 <$> const[PV "warnings"] sM
# 11 <$> const[PV "qw"] sM
# 12 <.> method_named[PV "unimport"]
# 13 <1> entersub[t1] KS*/TARG,STRICT
# 14 <1> leavesub[1 ref] K/REFC,1
# BEGIN 5:
# 15 <;> nextstate(main 3 -e:1) v:{
# 16 <#> gvsv[*beg] s
# 17 <1> postinc[t3] sK/1
# 18 <1> leavesub[1 ref] K/REFC,1
# 19 <;> nextstate(main 9 -e:1) v:{
# 1a <#> gvsv[*end] s
# 1b <1> postinc[t3] sK/1
# 1c <1> leavesub[1 ref] K/REFC,1
# 1d <;> nextstate(main 7 -e:1) v:{
# 1e <#> gvsv[*init] s
# 1f <1> postinc[t3] sK/1
# 1g <1> leavesub[1 ref] K/REFC,1
# 1h <;> nextstate(main 5 -e:1) v:{
# 1i <#> gvsv[*chk] s
# 1j <1> postinc[t3] sK/1
# 1k <1> leavesub[1 ref] K/REFC,1
# UNIT1l <;> nextstate(main 11 -e:1) v:{
# 1m <#> gvsv[*uc] s
# 1n <1> postinc[t3] sK/1
# 1o <1> leavesub[1 ref] K/REFC,1
# Failed test 15 - regression test for patch 25352 at t/optree_specials.t line 364
# got 'BEGIN 1:
# 1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$
# 2 <$> const[PV "strict.pm"] s/BARE
# 3 <1> require sK/1
# 4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$
# 5 <0> pushmark s
# 6 <$> const[PV "strict"] sM
# 7 <$> const[PV "refs"] sM
# 8 <.> method_named[PV "unimport"]
# 9 <1> entersub[t1] KS*/TARG,STRICT
# a <1> leavesub[1 ref] K/REFC,1
# BEGIN 2:
# b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$
# c <$> const[PV "strict.pm"] s/BARE
# d <1> require sK/1
# e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$
# f <0> pushmark s
# g <$> const[PV "strict"] sM
# h <$> const[PV "refs"] sM
# i <.> method_named[PV "unimport"]
# j <1> entersub[t1] KS*/TARG,STRICT
# k <1> leavesub[1 ref] K/REFC,1
# BEGIN 3:
# l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$
# m <$> const[PV "strict.pm"] s/BARE
# n <1> require sK/1
# o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$
# p <0> pushmark s
# q <$> const[PV "strict"] sM
# r <$> const[PV "refs"] sM
# s <.> method_named[PV "unimport"]
# t <1> entersub[t1] KS*/TARG,STRICT
# u <1> leavesub[1 ref] K/REFC,1
# BEGIN 4:
# v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$
# w <$> const[PV "warnings.pm"] s/BARE
# x <1> require sK/1
# y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$
# z <0> pushmark s
# 10 <$> const[PV "warnings"] sM
# 11 <$> const[PV "qw"] sM
# 12 <.> method_named[PV "unimport"]
# 13 <1> entersub[t1] KS*/TARG,STRICT
# 14 <1> leavesub[1 ref] K/REFC,1
# '
# expected /(?^ms:^BEGIN 1:
# 1 <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$
# 2 <\$> const\[PV ".*?"\] s/BARE
# 3 <1> require sK/1
# 4 <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$
# 5 <0> pushmark s
# 6 <\$> const\[PV ".*?"\] sM
# 7 <\$> const\[PV ".*?"\] sM
# 8 <\.> method_named\[PV ".*?"\]
# 9 <1> entersub\[t\d+\] KS\*/TARG,STRICT
# a <1> leavesub\[\d+ refs?\] K/REFC,1
# BEGIN 2:
# b <;> (?:next|db)state\([^()]*?\) v:\*,&,x\*,x&,x\$,\$
# c <\$> const\[PV ".*?"\] s/BARE
# d <1> require sK/1
# e <;> (?:next|db)state\([^()]*?\) :\*,&,x\*,x&,x\$,\$
# f <0> pushmark s
# g <\$> const\[PV ".*?"\] sM
# h <\$> const\[PV ".*?"\] sM
# i <\.> method_named\[PV ".*?"\]
# j <1> entersub\[t\d+\] KS\*/TARG,STRICT
# k <1> leavesub\[\d+ refs?\] K/REFC,1
# BEGIN 3:
# l <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$
# m <\$> const\[PV ".*?"\] s/BARE
# n <1> require sK/1
# o <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$
# p <0> pushmark s
# q <\$> const\[PV ".*?"\] sM
# r <\$> const\[PV ".*?"\] sM
# s <\.> method_named\[PV ".*?"\]
# t <1> entersub\[t\d+\] KS\*/TARG,STRICT
# u <1> leavesub\[\d+ refs?\] K/REFC,1
# $)/
# got: '1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$'
# want: (?^:1 <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$)
# got: '4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$'
# want: (?^:4 <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$)
# got: 'b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$'
# want: (?^:b <;> (?:next|db)state\([^()]*?\) v:\*,&,x\*,x&,x\$,\$)
# got: 'e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$'
# want: (?^:e <;> (?:next|db)state\([^()]*?\) :\*,&,x\*,x&,x\$,\$)
# got: 'l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$'
# want: (?^:l <;> (?:next|db)state\([^()]*?\) v:\*,&,\{,x\*,x&,x\$,\$)
# got: 'o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$'
# want: (?^:o <;> (?:next|db)state\([^()]*?\) :\*,&,\{,x\*,x&,x\$,\$)
# remainder:
# 1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$
# 4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$
# b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$
# e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$
# l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$
# o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$
# BEGIN 4:
# v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$
# w <$> const[PV "warnings.pm"] s/BARE
# x <1> require sK/1
# y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$
# z <0> pushmark s
# 10 <$> const[PV "warnings"] sM
# 11 <$> const[PV "qw"] sM
# 12 <.> method_named[PV "unimport"]
# 13 <1> entersub[t1] KS*/TARG,STRICT
# 14 <1> leavesub[1 ref] K/REFC,1
# these lines not matched:
# 1 <;> nextstate(B::Concise -910 Concise.pm:301) v:*,&,x*,x&,x$,$
# 4 <;> nextstate(B::Concise -910 Concise.pm:301) :*,&,x*,x&,x$,$
# b <;> nextstate(B::Concise -863 Concise.pm:366) v:*,&,{,x*,x&,x$,$
# e <;> nextstate(B::Concise -863 Concise.pm:366) :*,&,{,x*,x&,x$,$
# l <;> nextstate(B::Concise -838 Concise.pm:386) v:*,&,x*,x&,x$,$
# o <;> nextstate(B::Concise -838 Concise.pm:386) :*,&,x*,x&,x$,$
# BEGIN 4:
# v <;> nextstate(B::Concise -824 Concise.pm:406) v:*,&,{,x*,x&,x$,$
# w <$> const[PV "warnings.pm"] s/BARE
# x <1> require sK/1
# y <;> nextstate(B::Concise -824 Concise.pm:406) :*,&,{,x*,x&,x$,$
# z <0> pushmark s
# 10 <$> const[PV "warnings"] sM
# 11 <$> const[PV "qw"] sM
# 12 <.> method_named[PV "unimport"]
# 13 <1> entersub[t1] KS*/TARG,STRICT
# 14 <1> leavesub[1 ref] K/REFC,1
../ext/B/t/optree_specials.t .. Failed 3/15 subtests
Test Summary Report
-------------------
../ext/B/t/optree_specials.t (Wstat: 0 Tests: 15 Failed: 3)
Failed tests: 3, 13, 15
Files=1, Tests=15, 1 wallclock secs ( 0.01 usr 0.00 sys + 0.18 cusr 0.03 csys = 0.22 CPU)
Result: FAIL
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment