New TODO test: B::Deparse doesn't handle lexical subs
authorAaron Crane <arc@cpan.org>
Sun, 27 Jan 2013 10:56:14 +0000 (10:56 +0000)
committerAaron Crane <arc@cpan.org>
Sun, 27 Jan 2013 11:21:50 +0000 (11:21 +0000)
See RT #116553.

dist/B-Deparse/t/deparse.t

index 0a31c66..df90124 100644 (file)
@@ -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();