Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

49 lines (40 sloc) 1.048 kB
use v6;
use Test;
BEGIN { @*INC.push('t/spec/packages/') };
use Test::Util;
plan 8;
# L<S32::IO/IO::Writeable::Encoded/"it is a compiler error">
#?rakudo 3 todo 'nom regression'
eval_dies_ok('say', 'bare say is a compiler error');
eval_dies_ok('print', 'bare print is a compiler error');
#?niecza todo
eval_dies_ok('say()', 'say requires an argument');
is_run( 'say ()',
{
status => 0,
out => "\n",
err => '',
},
'say ()' );
is_run( 'say("")',
{
status => 0,
out => "\n",
err => '',
},
'say("")' );
# RT #61494
#?rakudo todo 'bare say'
{
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 { .say }',
{
status => 0,
out => "\"a\" => 1\n\"b\" => 2\n\"c\" => 3\n",
err => '',
},
'for %h { .say } (RT 74822)' );
# vim: ft=perl6
Jump to Line
Something went wrong with that request. Please try again.