Test sink statement prefix explodes Failures

Bug finding: https://irclog.perlgeek.de/perl6/2016-12-08#i_13706422 Rakudo fix: rakudo/rakudo@345f6a7146
Raku · Dec 8, 2016 · 49595cb · 49595cb
1 parent 57b0f8c
commit 49595cb
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/S04-exceptions/fail.t b/S04-exceptions/fail.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 31;
+plan 32;
 
 # L<S04/Exceptions/The fail function>
 
@@ -146,4 +146,8 @@ s1();
     nok $here, 'fail outside of routine just behaves like die (3)';
 }
 
+# https://irclog.perlgeek.de/perl6/2016-12-08#i_13706422
+throws-like { sink Failure.new }, Exception,
+    'sink statement prefix explodes Failures';
+
 # vim: ft=perl6