[perl #71476] tests available

[kyleha]

This is an automatically generated mail to inform you that tests are now 
available in t/spec/S12-methods/instance.t

commit 1b0acff2dd40389c3093751fec9d596734188835
Author: moritz <mor...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date:   Mon Jul 5 06:55:18 2010 +0000

    [t/spec] test for RT #71476, invocant type constraint should be checked at 
method call time
    
    git-svn-id: http://svn.pugscode.org/p...@31551 
c213334d-75ef-0310-aa23-eaa082d1ae64

diff --git a/t/spec/S12-methods/instance.t b/t/spec/S12-methods/instance.t
index d3824a5..9c4cef1 100644
--- a/t/spec/S12-methods/instance.t
+++ b/t/spec/S12-methods/instance.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 33;
+plan 34;
 
 =begin pod
 
@@ -199,4 +199,13 @@ is AnonInvocant.new().me, AnonInvocant, 'a typed $: as 
invocant is OK';
     is Y.new.y(*), 1, 'Can dispatch y(*)';
 }
 
+{
+    class InvocantTypeCheck {
+        method x(Int $a:) {
+            42;
+        }
+    }
+    dies_ok { InvocantTypeCheck.new.x() }, 'Invocant type is checked';
+}
+
 # vim: ft=perl6