Skip to content

Commit a458713

Browse files
committed
Add test for RT #72082
1 parent 3162e00 commit a458713

File tree

1 file changed

+8
-1
lines changed

1 file changed

+8
-1
lines changed

S06-signature/errors.t

Lines changed: 8 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22

33
use Test;
44

5-
plan 9;
5+
plan 10;
66

77
=begin pod
88
@@ -46,4 +46,11 @@ eval_lives_ok 'sub quuuux ($!) { ... }', 'but $! is OK';
4646
eval_dies_ok 'my class A { submethod BUILD(:$!notthere = 10) }; A.new',
4747
'named parameter of undeclared attribute dies';
4848

49+
# RT #72082
50+
{
51+
try { eval 'sub rt72082(@a, $b) {}; rt72082(5)' };
52+
my $error = ~$!;
53+
ok $error ~~ / 'will never work' .* 'Expected' .* '(@a, $b)' /
54+
}
55+
4956
# vim: ft=perl6

0 commit comments

Comments
 (0)