Fixed with cb82760625f6b8fec64a75 , tests needed.
> On 31 May 2017, at 07:20, brian d foy (via RT) <perl6-bugs-follo...@perl.org>
> wrote:
>
> # New Ticket Created by "brian d foy"
> # Please include the string: [perl #131408]
> # in the subject line of all future correspondence about this issue.
> # <URL: https://rt.perl.org/Ticket/Display.html?id=131408 >
>
>
> I have this program:
>
> #!/Applications/Rakudo/bin/perl6
>
> use Test;
> bail-out();
>
> When I run it, it complains about too many parameters:
>
> $ prove -e 'perl6 -Ilib' t/bail.t
> t/bail.t .. Any
> Too many positionals passed; expected 1 argument but got 2
> in sub bail-out at
> /Applications/Rakudo/share/perl6/sources/C712FE6969F786C9380D643DF17E85D06868219E
> (Test) line 258
> in block <unit> at t/bail.t line 4
>
> t/bail.t .. Dubious, test returned 1 (wstat 256, 0x100)
> No subtests run
>
> Test Summary Report
> -------------------
> t/bail.t (Wstat: 256 Tests: 0 Failed: 0)
> Non-zero exit status: 1
> Parse errors: No plan found in TAP output
> Files=1, Tests=0, 2 wallclock secs ( 0.03 usr 0.01 sys + 2.14
> cusr 0.16 csys = 2.34 CPU)
> Result: FAIL
>
> This is the section causing the problem:
>
> 256 sub bail-out ($desc?) is export {
> 257 $output.put: join ' ', 'Bail out!', ( $desc ?? $desc !! '' );
> 258 $done_testing_has_been_run = 1;
> 259 exit 255;
> 260 }
>
> I made several changes to try to suss out the problem, but I couldn't
> make the error go away without removing line 257. When I check
> "$output.^name",
> I get "Any".
>
> Running without `prove` shows the same problem:
>
> $ perl6 t/bail.t
> Too many positionals passed; expected 1 argument but got 2
> in sub bail-out at
> /Applications/Rakudo/share/perl6/sources/C712FE6969F786C9380D643DF17E85D06868219E
> (Test) line 257
> in block <unit> at t/bail.t line 4
>
> Running it in https://glot.io/new/perl6 shows the same thing.
>
> Besides the actual error, the error message isn't great. I would have
> liked it to mention the method name and class causing the problem.
>
>
> This is:
>
> $ perl6 -v
> This is Rakudo version 2017.04.3 built on MoarVM version
> 2017.04-53-g66c6dda
> implementing Perl 6.c.
