Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

45 lines (36 sloc) 0.91 kb
use v6;
use Test;
use lib 't/spec/packages';
use Test::Util;
plan 7;
# L<S32::IO/IO::Writeable::Encoded/"it is a compiler error">
eval-dies-ok('say', 'bare say is a compiler error');
eval-dies-ok('print', 'bare print is a compiler error');
is_run( 'say ()',
{
status => 0,
out => "\n",
err => '',
},
'say ()' );
is_run( 'say("")',
{
status => 0,
out => "\n",
err => '',
},
'say("")' );
# RT #61494
{
eval-dies-ok('say for 1', 'say for 1 is an error');
eval-dies-ok('say for 1', 'say for 1 is an error');
}
# RT #74822
is_run( 'my %h=<a b c> Z 1,2,3; for %h.sort(*.key) { .say }',
{
status => 0,
out => "a => 1\nb => 2\nc => 3\n",
err => '',
},
'for %h { .say } (RT 74822)' );
# vim: ft=perl6
Jump to Line
Something went wrong with that request. Please try again.