diff options
| author | Ruslan Zakirov <ruz@bestpractical.com> | 2013-03-02 16:57:41 +0400 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2013-09-13 01:25:34 -0700 |
| commit | 6dd3e0f2449b60948d1ae2a8377afcea1fb88000 (patch) | |
| tree | 7bb1d7d0fa55961d739a7b240953b5805d0fb866 /dist | |
| parent | ace8699dea8a8f004662f49f5587ba134fee9da1 (diff) | |
| download | perl-6dd3e0f2449b60948d1ae2a8377afcea1fb88000.tar.gz | |
index/value array slice operation
kvaslice operator that imlements %a[0,2,4] syntax which
result in list of index/value pairs. Implemented in
consistency with "key/value hash slice" operator.
Diffstat (limited to 'dist')
| -rw-r--r-- | dist/B-Deparse/Deparse.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/dist/B-Deparse/Deparse.pm b/dist/B-Deparse/Deparse.pm index 6aa8847426..7816b9d82d 100644 --- a/dist/B-Deparse/Deparse.pm +++ b/dist/B-Deparse/Deparse.pm @@ -3573,6 +3573,7 @@ sub slice { } sub pp_aslice { maybe_local(@_, slice(@_, "[", "]", "rv2av", "padav")) } +sub pp_kvaslice { slice(@_, "[", "]", "rv2av", "padav") } sub pp_hslice { maybe_local(@_, slice(@_, "{", "}", "rv2hv", "padhv")) } sub pp_kvhslice { slice(@_, "{", "}", "rv2hv", "padhv") } |