diff options
| author | Nicholas Clark <nick@ccl4.org> | 2004-07-13 11:19:31 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2004-07-13 11:19:31 +0000 |
| commit | eb209983b577c1511edd805e0a43c2e2113ddeaf (patch) | |
| tree | 0b985ad6e3b1320fc2332727538cb50c315c06ba /ext/B/t | |
| parent | 50528de03a5483f294e79d7075d69c5e4582d413 (diff) | |
| download | perl-eb209983b577c1511edd805e0a43c2e2113ddeaf.tar.gz | |
The current optimisation for sort {$b cmp $a} is bogus now that we
guarantee a stable sort. Disable it, pending a correct optimisation.
p4raw-id: //depot/perl@23093
Diffstat (limited to 'ext/B/t')
| -rw-r--r-- | ext/B/t/f_sort.t | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/ext/B/t/f_sort.t b/ext/B/t/f_sort.t index 7d66c2d901..f3eec358e6 100644 --- a/ext/B/t/f_sort.t +++ b/ext/B/t/f_sort.t @@ -154,11 +154,11 @@ checkOptree(note => q{}, # 3 <0> pushmark s # 4 <#> gv[*files] s # 5 <1> rv2av[t7] lK/1 -# 6 <@> sort lK/REV +# 6 <@> sort lKS* # 7 <0> pushmark s # 8 <#> gv[*articles] s # 9 <1> rv2av[t2] lKRM*/1 -# a <2> aassign[t5] KS +# a <2> aassign[t8] KS # b <1> leavesub[1 ref] K/REFC,1 EOT_EOT # 1 <;> nextstate(main 546 (eval 15):1) v @@ -166,11 +166,11 @@ EOT_EOT # 3 <0> pushmark s # 4 <$> gv(*files) s # 5 <1> rv2av[t3] lK/1 -# 6 <@> sort lK/REV +# 6 <@> sort lKS* # 7 <0> pushmark s # 8 <$> gv(*articles) s # 9 <1> rv2av[t1] lKRM*/1 -# a <2> aassign[t2] KS +# a <2> aassign[t4] KS # b <1> leavesub[1 ref] K/REFC,1 EONT_EONT @@ -228,11 +228,11 @@ checkOptree(note => q{}, # 3 <0> pushmark s # 4 <#> gv[*files] s # 5 <1> rv2av[t7] lK/1 -# 6 <@> sort lK/REV,NUM +# 6 <@> sort lKS* # 7 <0> pushmark s # 8 <#> gv[*articles] s # 9 <1> rv2av[t2] lKRM*/1 -# a <2> aassign[t5] KS +# a <2> aassign[t8] KS # b <1> leavesub[1 ref] K/REFC,1 EOT_EOT # 1 <;> nextstate(main 546 (eval 15):1) v @@ -240,11 +240,11 @@ EOT_EOT # 3 <0> pushmark s # 4 <$> gv(*files) s # 5 <1> rv2av[t3] lK/1 -# 6 <@> sort lK/REV,NUM +# 6 <@> sort lKS* # 7 <0> pushmark s # 8 <$> gv(*articles) s # 9 <1> rv2av[t1] lKRM*/1 -# a <2> aassign[t2] KS +# a <2> aassign[t4] KS # b <1> leavesub[1 ref] K/REFC,1 EONT_EONT |