Test that exit runs END phasers.

Raku · May 8, 2012 · fe93c85 · fe93c85
1 parent 65f0631
commit fe93c85
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/S04-phasers/end.t b/S04-phasers/end.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 3;
+plan 4;
 
 eval_lives_ok 'my $x = 3; END { $x * $x }',
               'outer lexicals are visible in END { ... } blocks';
@@ -16,4 +16,7 @@ eval_lives_ok 'my $x = 3; END { $a = $x * $x };',
 #?pugs todo
 is $a, 9, 'and they really worked';
 
+END { pass("exit does not prevent running of END blocks"); }
+exit;
+
 # vim: ft=perl6