diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-05-24 15:11:53 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-06-11 09:52:56 +0200 |
| commit | c13a5c80de2334e935eada0927b9f5f7c862a45e (patch) | |
| tree | 0c3f447e07e19ac968e711ec579a327c9090125f /ext/B/t/optree_misc.t | |
| parent | 2bda37bab5fb768caff2b228fda376b75df4815c (diff) | |
| download | perl-c13a5c80de2334e935eada0927b9f5f7c862a45e.tar.gz | |
Store FBMs in PVMGs, instead of GVs.
This should reduce the complexity of code dealing with GVs, as they no longer
try to play several different incompatible roles.
(As suggested by Ben Morrow. However, it didn't turn out to be as
straightforward as one might have hoped).
Diffstat (limited to 'ext/B/t/optree_misc.t')
| -rw-r--r-- | ext/B/t/optree_misc.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/B/t/optree_misc.t b/ext/B/t/optree_misc.t index 4c3ea1457f..5e16b9262f 100644 --- a/ext/B/t/optree_misc.t +++ b/ext/B/t/optree_misc.t @@ -95,7 +95,7 @@ my $t = <<'EOT_EOT'; # 5 <@> index[t2] sK/2 ->6 # - <0> ex-pushmark s ->3 # 3 <$> const[PV "foo"] s ->4 -# 4 <$> const[GV "foo"] s ->5 +# 4 <$> const[PVMG "foo"] s ->5 # - <1> ex-rv2sv sKRM*/1 ->7 # 6 <#> gvsv[*_] s ->7 EOT_EOT @@ -107,7 +107,7 @@ my $nt = <<'EONT_EONT'; # 5 <@> index[t1] sK/2 ->6 # - <0> ex-pushmark s ->3 # 3 <$> const(PV "foo") s ->4 -# 4 <$> const(GV "foo") s ->5 +# 4 <$> const(PVMG "foo") s ->5 # - <1> ex-rv2sv sKRM*/1 ->7 # 6 <$> gvsv(*_) s ->7 EONT_EONT |