Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Tree: dbd529b2c0
Fetching contributors…

Cannot retrieve contributors at this time

24 lines (16 sloc) 0.466 kB
use v6;
use Test;
plan 3;
# L<S29/Context/"=item exit">
BEGIN { @*INC.push: 't/spec/packages' };
use Test::Util;
is_run 'say 3; exit; say 5',
{ out => "3\n", err => "", status => 0 },
'bare exit; works';
is_run 'say 3; exit 5; say 5',
{ out => "3\n", err => "", status => 5 },
'exit 5; works';
is_run 'say 3; try { exit 5 }; say 5',
{ out => "3\n", err => "", status => 5 },
'try-block does not catch exit exceptions';
# vim: ft=perl6
Jump to Line
Something went wrong with that request. Please try again.