Add test for RT #115916

Raku · Apr 13, 2015 · d561d49 · d561d49
1 parent e6f9b8c
commit d561d49
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/S04-declarations/my.t b/S04-declarations/my.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 95;
+plan 96;
 
 #L<S04/The Relationship of Blocks and Declarations/"declarations, all
 # lexically scoped declarations are visible"> 
@@ -239,6 +239,11 @@ my $z = 42; #OK not used
     dies_ok { my int ($a, $b); $b = "str" }, 'Native type outside declarator sig 2/2 constrains';
 }
 
+# RT #115916
+{
+    throws_like { my (Str $rt115916) = 3 }, X::TypeCheck, 'another Type in declarator sig';
+}
+
 {
     nok declare_later().defined,
         'Can access variable returned from a named closure that is declared below the calling position';