Skip to content

Commit

Permalink
Add a note to help devs find "fail"
Browse files Browse the repository at this point in the history
  • Loading branch information
coke committed Jul 2, 2016
1 parent 4622c50 commit 3fda0b0
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions lib/Test.pm6
Expand Up @@ -365,6 +365,7 @@ sub diag(Mu $message) is export {
$time_before = nqp::time_n;
}

# In earlier Perls, this is spelled "sub fail"
multi sub flunk($reason) is export {
$time_after = nqp::time_n;
my $ok = proclaim(0, $reason);
Expand Down

0 comments on commit 3fda0b0

Please sign in to comment.