Permalink
Browse files

Untodo tests reliably passing after is_run fix.

Hopefully, these hold up on other platforms also.
  • Loading branch information...
jnthn committed Sep 25, 2013
1 parent c84521b commit f7f2b55bc4fb6b832f149462bc001a3f4157793b
Showing with 0 additions and 11 deletions.
  1. +0 −2 S29-context/die.t
  2. +0 −2 S29-context/exit.t
  3. +0 −2 S32-basics/warn.t
  4. +0 −5 S32-io/note.t
View
@@ -55,15 +55,13 @@ is ({ try { die_in_return(); 23 }; 42 }()), 42, "die in return";
is "$!", $msg, 'die with no argument uses $!';
}
-#?rakudo.jvm todo "nigh"
is_run( 'die "first line"',
{ status => sub { 0 != $^a },
out => '',
err => rx/'first line'/,
},
'die with no output' );
-#?rakudo.jvm todo "nigh"
is_run( 'say "hello"; die "Nos morituri te salutant!\n"',
{ status => sub { 0 != $^a },
out => "hello\n",
View
@@ -12,12 +12,10 @@ is_run 'say 3; exit; say 5',
{ out => "3\n", err => "", status => 0 },
'bare exit; works';
-#?rakudo.jvm todo "nigh"
is_run 'say 3; exit 5; say 5',
{ out => "3\n", err => "", status => 5 +< 8 },
'exit 5; works';
-#?rakudo.jvm todo "nigh"
is_run 'say 3; try { exit 5 }; say 5',
{ out => "3\n", err => "", status => 5 +< 8 },
'try-block does not catch exit exceptions';
View
@@ -37,7 +37,6 @@ use Test::Util;
}
#?niecza todo
-#?rakudo.jvm todo "nigh"
is_run 'use v6; warn; say "alive"',
{
status => 0,
@@ -55,7 +54,6 @@ is_run 'use v6; warn("OH NOEZ"); say "alive"',
},
'warn() with arguments; line number';
-#?rakudo.jvm todo "nigh"
is_run 'use v6; try {warn("OH NOEZ") }; say "alive"',
{
status => 0,
View
@@ -6,7 +6,6 @@ plan 6;
# L<S32::IO/Functions/note>
-#?rakudo.jvm todo "nigh"
is_run( 'note "basic form"',
{
status => 0,
@@ -15,7 +14,6 @@ is_run( 'note "basic form"',
},
'basic form of note' );
-#?rakudo.jvm todo "nigh"
is_run( 'note "multiple", " ", "params"',
{
status => 0,
@@ -24,7 +22,6 @@ is_run( 'note "multiple", " ", "params"',
},
'note multiple parameters' );
-#?rakudo.jvm todo "nigh"
is_run( 'my @a = ("array", "of", "params"); note @a',
{
status => 0,
@@ -33,7 +30,6 @@ is_run( 'my @a = ("array", "of", "params"); note @a',
},
'note array' );
-#?rakudo.jvm todo "nigh"
is_run( 'my $a = <stringify args>; note $a',
{
status => 0,
@@ -52,7 +48,6 @@ is_run( '"method form".note',
},
'method form of note' );
-#?rakudo.jvm todo "nigh"
is_run( 'try { note "with try" }',
{
status => 0,

0 comments on commit f7f2b55

Please sign in to comment.