This is an automatically generated mail to inform you that tests are now available in at least one of these files: t/spec/S02-names_and_variables/signature.t, t/spec/S06-signature/passing-arrays.t
commit b43d5859691e04a410a5a72af5d363612a967c9f Author: moritz <mor...@c213334d-75ef-0310-aa23-eaa082d1ae64> Date: Sun May 30 20:40:07 2010 +0000 [t/spec] test for RT #74336 git-svn-id: http://svn.pugscode.org/p...@31004 c213334d-75ef-0310-aa23-eaa082d1ae64 diff --git a/t/spec/S02-names_and_variables/signature.t b/t/spec/S02-names_and_variables/signature.t index 6f263a2..ca74e07 100644 --- a/t/spec/S02-names_and_variables/signature.t +++ b/t/spec/S02-names_and_variables/signature.t @@ -2,7 +2,7 @@ use v6; use Test; -plan 11; +plan 12; # The :() form constructs signatures similar to how \() constructs Captures. # A subroutine's .signature is a Siglist object. @@ -75,4 +75,13 @@ plan 11; "a subroutine's siglist can be accessed via .signature (3)"; } +{ + my @a = 1,2,3; + my (@c) = @a; + my $i = 0; + $i++ for @c; + #?rakudo todo 'RT 74336' + is $i, 3, 'asigning to an array in a signature is sane'; +} + # vim: ft=perl6 diff --git a/t/spec/S06-signature/passing-arrays.t b/t/spec/S06-signature/passing-arrays.t index d76471b..95c7a3f 100644 --- a/t/spec/S06-signature/passing-arrays.t +++ b/t/spec/S06-signature/passing-arrays.t @@ -14,6 +14,7 @@ plan 11; } is count([1, 2, 3, 4]), 4, 'count([1, 2, 3, 4])'; + #?rakudo skip 'bogus error message' is count(my @b = 1, 2, 3, 4), 4, 'count(my @b = 1, 2, 3)'; is count((1, 2, 3)), 3, 'count((1, 2, 3))';