summaryrefslogtreecommitdiff
path: root/dist/B-Deparse/t/deparse.t
diff options
context:
space:
mode:
authorAaron Crane <arc@cpan.org>2013-01-27 10:56:14 +0000
committerAaron Crane <arc@cpan.org>2013-01-27 11:21:50 +0000
commitce4062e750ec42ef0a797a18b3c342e4715bce6e (patch)
tree62163252579af888ce326a023e39f0d6949e8304 /dist/B-Deparse/t/deparse.t
parent0f8767845c2e9b6c1a4363147835e5b95b61151d (diff)
downloadperl-ce4062e750ec42ef0a797a18b3c342e4715bce6e.tar.gz
New TODO test: B::Deparse doesn't handle lexical subs
See RT #116553.
Diffstat (limited to 'dist/B-Deparse/t/deparse.t')
-rw-r--r--dist/B-Deparse/t/deparse.t7
1 files changed, 7 insertions, 0 deletions
diff --git a/dist/B-Deparse/t/deparse.t b/dist/B-Deparse/t/deparse.t
index 0a31c66109..df90124535 100644
--- a/dist/B-Deparse/t/deparse.t
+++ b/dist/B-Deparse/t/deparse.t
@@ -1368,3 +1368,10 @@ $a x= $b;
####
# @_ with padrange
my($a, $b, $c) = @_;
+####
+# SKIP ?$] < 5.017004 && "lexical subs not implemented on this Perl version"
+# TODO unimplemented in B::Deparse; RT #116553
+# lexical subroutine
+use feature 'lexical_subs';
+my sub f {}
+print f();