Skip to content

Commit

Permalink
fudge quoting.t for rakudo
Browse files Browse the repository at this point in the history
  • Loading branch information
moritz committed Jul 28, 2011
1 parent 0b33da3 commit 13af15f
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions S02-literals/quoting.t
Expand Up @@ -92,6 +92,7 @@ Note that non-ASCII tests are kept in quoting-unicode.t
my @q;
sub q { @_ }
@q = q($foo,$bar);
#?rakudo todo 'q() as sub call'
is(+@q, 2, 'q() is always sub call');
};

Expand Down Expand Up @@ -560,6 +561,7 @@ Hello, World
isa_ok rx:ignorecase{foo}, Regex, 'rx:i{...}';
isa_ok rx:s{foo}, Regex, 'rx:i{...}';
isa_ok rx:sigspace{foo}, Regex, 'rx:i{...}';
#?rakudo 2 todo 'unknown adverbs'
eval_dies_ok 'rx:unknown{foo}', 'rx:unknown dies';
eval_dies_ok 'rx:g{foo}', 'g does not make sense on rx//';
}
Expand All @@ -570,6 +572,7 @@ Hello, World
is qx/echo world/.chomp, "world", 'qx';
is qqx/echo $var/.chomp, "world", 'qqx';
# RT #78874
#?rakudo skip 'trans'
is qx/echo world/.trans('wd' => 'WD'), "WorlD\n", "qx doesn't return a Parrot string";
}
Expand Down

0 comments on commit 13af15f

Please sign in to comment.