This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
B::Deparse misdeparses qq(@,)
authorHojung Youn <amoc.yn@gmail.com>
Sun, 10 Jul 2011 08:41:13 +0000 (17:41 +0900)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 10 Jul 2011 13:08:57 +0000 (06:08 -0700)
commitbb8996b8daf880fb1123eec76a598d052af98c87
treefe9ff3a2a19477d56cf9eaaddcdb3c911f99cfcf
parent903c0e71ef4db59d59dc1e818fd65b4096c422a1
B::Deparse misdeparses qq(@,)

This commit changes the signature of stash_variable() in B::Deparse.
stash_variable() takes $cx value additionally to know whether or not
it is in the interpolation context.

Punctuation arrays such as @* are usually interpolated only if the
name is enclosed in braces @{*}, but the arrays @_, @+, @- are
interpolated even without braces.

related issue: #93990
dist/B-Deparse/Deparse.pm
dist/B-Deparse/t/deparse.t