# 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.