Skip to content

Commit ceabda6

Browse files
committed
Test line number of the corresponding starter
Adds tests for RT #130261. I don't find this test elegant, but it should be enough to close the ticket.
1 parent 3ca3155 commit ceabda6

File tree

1 file changed

+6
-1
lines changed

1 file changed

+6
-1
lines changed

S32-exceptions/misc.t

Lines changed: 6 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -5,7 +5,7 @@ use lib "t/spec/packages";
55
use Test;
66
use Test::Util;
77

8-
plan 447;
8+
plan 448;
99

1010
throws-like '42 +', Exception, "missing rhs of infix", message => rx/term/;
1111

@@ -992,4 +992,9 @@ throws-like 'sub foo (--> Bool; Int $x; Int $y)', X::Syntax::Malformed, what =>
992992
throws-like 'sub foo ($x, --> Bool, Int $y)', X::Syntax::Malformed, what => /^'return value'/;
993993
throws-like 'sub foo ($x; --> Bool; Int $y)', X::Syntax::Malformed, what => /^'return value'/;
994994

995+
# RT #130261
996+
throws-like say ‘hello';
997+
say 42;
998+
say 50;, X::Comp::FailGoal, line => 3, message => /«'line 1'»/;
999+
9951000
# vim: ft=perl6

0 commit comments

Comments
 (0)