From 1b5ab32107f2cde899754c84ab69f67766523651 Mon Sep 17 00:00:00 2001
From: jnthn <jnthn@jnthn.net>
Date: Tue, 8 May 2012 19:16:07 +0200
Subject: [PATCH] Run END phasers when exit terminates a program.

---
 src/core/control.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/core/control.pm b/src/core/control.pm
index 615064e59db..75819a4a6eb 100644
--- a/src/core/control.pm
+++ b/src/core/control.pm
@@ -158,6 +158,7 @@ sub eval(Str $code, :$lang = 'perl6') {
 
 
 sub exit($status = 0) {
+    $_() for pir::perl6ize_type__PP(@*END_PHASERS);
     nqp::exit($status.Int);
     $status;
 }