diff options
| author | Nicholas Clark <nick@ccl4.org> | 2006-02-22 18:21:30 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2006-02-22 18:21:30 +0000 |
| commit | b5b10606725dc42adb2909e77c05473776295195 (patch) | |
| tree | ef8ef4bcf410f47211b1780ed640f3fb12afcb70 /ext/Devel | |
| parent | e36cc0fbcf17e559bf3f189f3b67eca0ac6dc543 (diff) | |
| download | perl-b5b10606725dc42adb2909e77c05473776295195.tar.gz | |
sv_dump should report the PV for PVGVs, as it can get set.
(Typeglobs stringify via a call to GET magic, which uses the PV slot.)
p4raw-id: //depot/perl@27269
Diffstat (limited to 'ext/Devel')
| -rw-r--r-- | ext/Devel/Peek/t/Peek.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/Devel/Peek/t/Peek.t b/ext/Devel/Peek/t/Peek.t index 0f4fbb8966..b8ee13a4cb 100644 --- a/ext/Devel/Peek/t/Peek.t +++ b/ext/Devel/Peek/t/Peek.t @@ -308,6 +308,7 @@ do_test(17, FLAGS = \\(GMG,SMG,MULTI(?:,IN_PAD)?\\) IV = 0 NV = 0 + PV = 0 MAGIC = $ADDR MG_VIRTUAL = &PL_vtbl_glob MG_TYPE = PERL_MAGIC_glob\(\*\) |