Test for RT #112922.

Raku · Jun 30, 2015 · c286040 · c286040
1 parent c1305ef
commit c286040
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/S06-signature/optional.t b/S06-signature/optional.t
@@ -3,7 +3,7 @@ use Test;
 
 # L<S06/Optional parameters/>
 
-plan 28;
+plan 29;
 
 sub opt1($p?) { defined($p) ?? $p !! 'undef'; }
 
@@ -126,4 +126,10 @@ eval-dies-ok 'sub opt($a = 1, $b) { }',
         'making an "is rw" parameter optional dies with adequate error message';
 }
 
+# RT #112922
+{
+    throws-like 'sub foo(Int $x = "omg") { }', X::Parameter::Default::TypeCheck,
+        'Catch impossible default types at compile time';
+}
+
 # vim: ft=perl6