X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flineno.t;h=279c324d7e2328194dcd931e827137657c6cd733;hb=8c79ea4a9df54fc083be365d107dd81036057864;hp=40ac0be852d35fbf319217da51a65aac5e7c833a;hpb=d5ac8da0a2685c743fa908b5264b26477b67c046;p=p5sagit%2FFunction-Parameters.git diff --git a/t/lineno.t b/t/lineno.t index 40ac0be..279c324 100644 --- a/t/lineno.t +++ b/t/lineno.t @@ -1,7 +1,7 @@ use warnings; use strict; -use Test::More tests => 8; +use Test::More tests => 11; use Function::Parameters; @@ -48,8 +48,8 @@ fun () { test_loc 'LX -- 3'; -TODO: { - local $TODO = 'expressions break line numbers???'; +{ + #local $TODO = 'expressions break line numbers???'; 0 , fun { @@ -60,4 +60,18 @@ TODO: { test_loc 'LX -- 4'; } +{ + #local $TODO = 'newlines in prototype/attributes'; + + fun wtf :( + + ) + : + { test_loc 'LX -- 5 (inner)' } + + test_loc 'LX -- 5 (bonus)'; + wtf; + test_loc 'LX -- 5 (outer)'; +} + __DATA__