summaryrefslogtreecommitdiff
path: root/ext/B
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2013-06-26 01:08:29 -0700
committerFather Chrysostomos <sprout@cpan.org>2013-06-26 01:12:11 -0700
commit85117865c7464787d9150f9752e721db2e775fa3 (patch)
tree937ffafdff0f1bcdea985e63ce6347d7b83e414b /ext/B
parentf65493df1c26b49c6e7c2d339c58c48f4326f4b4 (diff)
downloadperl-85117865c7464787d9150f9752e721db2e775fa3.tar.gz
Fix up f_sort.t for changes in the prev commit
Diffstat (limited to 'ext/B')
-rw-r--r--ext/B/t/f_sort.t60
1 files changed, 40 insertions, 20 deletions
diff --git a/ext/B/t/f_sort.t b/ext/B/t/f_sort.t
index 152d882e30..1e63eabf19 100644
--- a/ext/B/t/f_sort.t
+++ b/ext/B/t/f_sort.t
@@ -129,7 +129,8 @@ checkOptree(note => q{},
# 2 <0> pushmark s
# 3 <0> pushmark s
# 4 <#> gv[*files] s
-# 5 <1> rv2av[t9] lK/1
+# 5 <1> rv2av[t9] lK/1 < 5.019002
+# 5 <1> rv2av[t9] lKM/1 >=5.019002
# 6 <@> sort lKS*
# 7 <0> pushmark s
# 8 <#> gv[*articles] s
@@ -141,7 +142,8 @@ EOT_EOT
# 2 <0> pushmark s
# 3 <0> pushmark s
# 4 <$> gv(*files) s
-# 5 <1> rv2av[t5] lK/1
+# 5 <1> rv2av[t5] lK/1 < 5.019002
+# 5 <1> rv2av[t5] lKM/1 >=5.019002
# 6 <@> sort lKS*
# 7 <0> pushmark s
# 8 <$> gv(*articles) s
@@ -279,7 +281,8 @@ checkOptree(note => q{},
# 3 <0> pushmark s
# 4 <#> gv[*age] s
# 5 <1> rv2hv[t9] lKRM/1
-# 6 <1> keys[t10] lK/1
+# 6 <1> keys[t10] lK/1 < 5.019002
+# 6 <1> keys[t10] lKM/1 >=5.019002
# 7 <@> sort lKS*
# 8 <0> pushmark s
# 9 <#> gv[*eldest] s
@@ -292,7 +295,8 @@ EOT_EOT
# 3 <0> pushmark s
# 4 <$> gv(*age) s
# 5 <1> rv2hv[t3] lKRM/1
-# 6 <1> keys[t4] lK/1
+# 6 <1> keys[t4] lK/1 < 5.019002
+# 6 <1> keys[t4] lKM/1 >=5.019002
# 7 <@> sort lKS*
# 8 <0> pushmark s
# 9 <$> gv(*eldest) s
@@ -321,7 +325,8 @@ checkOptree(note => q{},
# 3 <0> pushmark s
# 4 <$> const[PV "byage"] s/BARE
# 5 <#> gv[*class] s
-# 6 <1> rv2av[t4] lK/1
+# 6 <1> rv2av[t4] lK/1 < 5.019002
+# 6 <1> rv2av[t4] lKM/1 >=5.019002
# 7 <@> sort lKS
# 8 <0> pushmark s
# 9 <#> gv[*sortedclass] s
@@ -334,7 +339,8 @@ EOT_EOT
# 3 <0> pushmark s
# 4 <$> const(PV "byage") s/BARE
# 5 <$> gv(*class) s
-# 6 <1> rv2av[t2] lK/1
+# 6 <1> rv2av[t2] lK/1 < 5.019002
+# 6 <1> rv2av[t2] lKM/1 >=5.019002
# 7 <@> sort lKS
# 8 <0> pushmark s
# 9 <$> gv(*sortedclass) s
@@ -400,7 +406,8 @@ checkOptree(name => q{sort USERSUB LIST },
# w <0> pushmark s
# x <$> const[PV "backwards"] s/BARE
# y <#> gv[*harry] s
-# z <1> rv2av[t10] lK/1
+# z <1> rv2av[t10] lK/1 < 5.019002
+# z <1> rv2av[t10] lKM/1 >=5.019002
# 10 <@> sort lKS
# 11 <@> print vK
# 12 <;> nextstate(main 602 (eval 32):5) v:{
@@ -449,7 +456,8 @@ EOT_EOT
# w <0> pushmark s
# x <$> const(PV "backwards") s/BARE
# y <$> gv(*harry) s
-# z <1> rv2av[t6] lK/1
+# z <1> rv2av[t6] lK/1 < 5.019002
+# z <1> rv2av[t6] lKM/1 >=5.019002
# 10 <@> sort lKS
# 11 <@> print vK
# 12 <;> nextstate(main 602 (eval 32):5) v:{
@@ -502,7 +510,8 @@ checkOptree(name => q{Compound sort/map Expression },
# 7 <1> rv2av[t19] lKM/1
# 8 <@> mapstart lK* < 5.017002
# 8 <@> mapstart lK >=5.017002
-# 9 <|> mapwhile(other->a)[t20] lK
+# 9 <|> mapwhile(other->a)[t20] lK < 5.019002
+# 9 <|> mapwhile(other->a)[t20] lKM >=5.019002
# a <0> enter l
# b <;> nextstate(main 608 (eval 34):2) v:{
# c <0> pushmark s
@@ -539,7 +548,8 @@ EOT_EOT
# 7 <1> rv2av[t10] lKM/1
# 8 <@> mapstart lK* < 5.017002
# 8 <@> mapstart lK >=5.017002
-# 9 <|> mapwhile(other->a)[t11] lK
+# 9 <|> mapwhile(other->a)[t11] lK < 5.019002
+# 9 <|> mapwhile(other->a)[t11] lKM >=5.019002
# a <0> enter l
# b <;> nextstate(main 608 (eval 34):2) v:{
# c <0> pushmark s
@@ -590,7 +600,8 @@ checkOptree(name => q{sort other::sub LIST },
# 3 <0> pushmark s
# 4 <$> const[PV "other::backwards"] s/BARE
# 5 <#> gv[*old] s
-# 6 <1> rv2av[t4] lK/1
+# 6 <1> rv2av[t4] lK/1 < 5.019002
+# 6 <1> rv2av[t4] lKM/1 >=5.019002
# 7 <@> sort lKS
# 8 <0> pushmark s
# 9 <#> gv[*new] s
@@ -603,7 +614,8 @@ EOT_EOT
# 3 <0> pushmark s
# 4 <$> const(PV "other::backwards") s/BARE
# 5 <$> gv(*old) s
-# 6 <1> rv2av[t2] lK/1
+# 6 <1> rv2av[t2] lK/1 < 5.019002
+# 6 <1> rv2av[t2] lKM/1 >=5.019002
# 7 <@> sort lKS
# 8 <0> pushmark s
# 9 <$> gv(*new) s
@@ -630,7 +642,8 @@ checkOptree(note => q{},
# 3 <0> pushmark s
# 4 <$> const[PV "other::backwards"] s/BARE
# 5 <#> gv[*old] s
-# 6 <1> rv2av[t4] lK/1
+# 6 <1> rv2av[t4] lK/1 < 5.019002
+# 6 <1> rv2av[t4] lKM/1 >=5.019002
# 7 <@> sort lKS
# 8 <0> pushmark s
# 9 <#> gv[*new] s
@@ -643,7 +656,8 @@ EOT_EOT
# 3 <0> pushmark s
# 4 <$> const(PV "other::backwards") s/BARE
# 5 <$> gv(*old) s
-# 6 <1> rv2av[t2] lK/1
+# 6 <1> rv2av[t2] lK/1 < 5.019002
+# 6 <1> rv2av[t2] lKM/1 >=5.019002
# 7 <@> sort lKS
# 8 <0> pushmark s
# 9 <$> gv(*new) s
@@ -666,7 +680,8 @@ my ($expect, $expect_nt) = (<<'EOT_EOT', <<'EONT_EONT');
# 2 <0> pushmark s
# 3 <0> pushmark s
# 4 <#> gv[*old] s
-# 5 <1> rv2av[t9] lK/1
+# 5 <1> rv2av[t9] lK/1 < 5.019002
+# 5 <1> rv2av[t9] lKM/1 >=5.019002
# 6 <@> sort lKS*/STABLE
# 7 <0> pushmark s
# 8 <#> gv[*new] s
@@ -678,7 +693,8 @@ EOT_EOT
# 2 <0> pushmark s
# 3 <0> pushmark s
# 4 <$> gv(*old) s
-# 5 <1> rv2av[t5] lK/1
+# 5 <1> rv2av[t5] lK/1 < 5.019002
+# 5 <1> rv2av[t5] lKM/1 >=5.019002
# 6 <@> sort lKS*/STABLE
# 7 <0> pushmark s
# 8 <$> gv(*new) s
@@ -709,7 +725,8 @@ checkOptree(note => q{},
# 2 <0> pushmark s
# 3 <0> pushmark s
# 4 <#> gv[*old] s
-# 5 <1> rv2av[t9] lK/1
+# 5 <1> rv2av[t9] lK/1 < 5.019002
+# 5 <1> rv2av[t9] lKM/1 >=5.019002
# 6 <@> sort lKS*
# 7 <0> pushmark s
# 8 <#> gv[*new] s
@@ -721,7 +738,8 @@ EOT_EOT
# 2 <0> pushmark s
# 3 <0> pushmark s
# 4 <$> gv(*old) s
-# 5 <1> rv2av[t5] lK/1
+# 5 <1> rv2av[t5] lK/1 < 5.019002
+# 5 <1> rv2av[t5] lKM/1 >=5.019002
# 6 <@> sort lKS*
# 7 <0> pushmark s
# 8 <$> gv(*new) s
@@ -746,7 +764,8 @@ checkOptree(note => q{},
# 2 <0> pushmark s
# 3 <0> pushmark s
# 4 <#> gv[*files] s
-# 5 <1> rv2av[t7] lK/1
+# 5 <1> rv2av[t7] lK/1 < 5.019002
+# 5 <1> rv2av[t7] lKM/1 >=5.019002
# 6 <@> sort lKS*
# 7 <0> pushmark s
# 8 <#> gv[*articles] s
@@ -758,7 +777,8 @@ EOT_EOT
# 2 <0> pushmark s
# 3 <0> pushmark s
# 4 <$> gv(*files) s
-# 5 <1> rv2av[t3] lK/1
+# 5 <1> rv2av[t3] lK/1 < 5.019002
+# 5 <1> rv2av[t3] lKM/1 >=5.019002
# 6 <@> sort lKS*
# 7 <0> pushmark s
# 8 <$> gv(*articles) s