Skip to content

Commit

Permalink
[t/spec/S04] change ?: to ??!!
Browse files Browse the repository at this point in the history
git-svn-id: http://svn.pugscode.org/pugs@28012 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information
lwall committed Aug 17, 2009
1 parent 7f910be commit fd2754c
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 4 deletions.
4 changes: 2 additions & 2 deletions S04-closure-traits/enter-leave.t
Expand Up @@ -115,9 +115,9 @@ plan 19;
{
my $str;
{
LEAVE { $str ~= (defined $! ? 'yes' : 'no') }
LEAVE { $str ~= (defined $! ?? 'yes' !! 'no') }
try { die 'foo' }
$str ~= (defined $! ? 'aye' : 'nay');
$str ~= (defined $! ?? 'aye' !! 'nay');
}
is $str, 'ayeno', '$! not set in LEAVE if exception not thrown';
}
Expand Down
4 changes: 2 additions & 2 deletions S04-closure-traits/pre-post.t
Expand Up @@ -186,9 +186,9 @@ dies_ok { $pt.test(1) }, 'POST receives return value as $_ (failure)';
{
my $str;
try {
POST { $str ~= (defined $! ? 'yes' : 'no'); 1 }
POST { $str ~= (defined $! ?? 'yes' !! 'no'); 1 }
try { die 'foo' }
$str ~= (defined $! ? 'aye' : 'nay');
$str ~= (defined $! ?? 'aye' !! 'nay');
}
is $str, 'ayeno', 'POST has undef $! on no exception';
}
Expand Down

0 comments on commit fd2754c

Please sign in to comment.