diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-09-27 09:55:35 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-09-27 09:55:35 +0000 |
| commit | 6c860c16eedf5aa7517b2af8762c85efd99e9418 (patch) | |
| tree | 4ee6bd908a314bde0ed43f7287eccaf6ceda020f /ext | |
| parent | 756c5c2b691752248a1635194088c45476f496bb (diff) | |
| download | perl-6c860c16eedf5aa7517b2af8762c85efd99e9418.tar.gz | |
I forgot to patch for the threaded case
p4raw-id: //depot/perl@31988
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/B/t/optree_specials.t | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/ext/B/t/optree_specials.t b/ext/B/t/optree_specials.t index 9813afe2a4..22db718133 100644 --- a/ext/B/t/optree_specials.t +++ b/ext/B/t/optree_specials.t @@ -163,7 +163,7 @@ checkOptree ( name => 'END', # END 1: # 4 <1> leavesub[1 ref] K/REFC,1 ->(end) # - <@> lineseq KP ->4 -# 1 <;> nextstate(main 5 -e:6) v:>,<,%,{ ->2 +# 1 <;> nextstate(main 5 -e:6) v:{ ->2 # 3 <1> postinc[t3] sK/1 ->4 # - <1> ex-rv2sv sKRM/1 ->3 # 2 <#> gvsv[*end] s ->3 @@ -186,7 +186,7 @@ checkOptree ( name => 'CHECK', # CHECK 1: # 4 <1> leavesub[1 ref] K/REFC,1 ->(end) # - <@> lineseq KP ->4 -# 1 <;> nextstate(main 3 -e:4) v:>,<,%,{ ->2 +# 1 <;> nextstate(main 3 -e:4) v:{ ->2 # 3 <1> postinc[t3] sK/1 ->4 # - <1> ex-rv2sv sKRM/1 ->3 # 2 <#> gvsv[*chk] s ->3 @@ -209,7 +209,7 @@ if ($] >= 5.009) { # UNITCHECK 1: # 4 <1> leavesub[1 ref] K/REFC,1 ->(end) # - <@> lineseq KP ->4 -# 1 <;> nextstate(main 3 -e:4) v:>,<,%,{ ->2 +# 1 <;> nextstate(main 3 -e:4) v:{ ->2 # 3 <1> postinc[t3] sK/1 ->4 # - <1> ex-rv2sv sKRM/1 ->3 # 2 <#> gvsv[*uc] s ->3 @@ -233,7 +233,7 @@ checkOptree ( name => 'INIT', # INIT 1: # 4 <1> leavesub[1 ref] K/REFC,1 ->(end) # - <@> lineseq KP ->4 -# 1 <;> nextstate(main 4 -e:5) v:>,<,%,{ ->2 +# 1 <;> nextstate(main 4 -e:5) v:{ ->2 # 3 <1> postinc[t3] sK/1 ->4 # - <1> ex-rv2sv sKRM/1 ->3 # 2 <#> gvsv[*init] s ->3 |