sink END phasers

rakudo · Nov 24, 2012 · 55daa71 · 55daa71
1 parent a060144
commit 55daa71
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/src/main.nqp b/src/main.nqp
@@ -42,7 +42,10 @@ sub MAIN(@ARGS) {
     if nqp::can($result, 'sink') {
         $result.sink();
     }
-    
+
     # Run any END blocks before exiting.
-    for @*END_PHASERS { $_() }
+    for @*END_PHASERS {
+        $result := $_();
+        nqp::can($result, 'sink') && $result.sink();
+    }
 }