[t/spec] Test for .WHAT on a multi.

git-svn-id: http://svn.pugscode.org/pugs@25818 c213334d-75ef-0310-aa23-eaa082d1ae64
Raku · Mar 13, 2009 · d535647 · d535647
1 parent 81691fe
commit d535647
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/S06-multi/syntax.t b/S06-multi/syntax.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 17;
+plan 18;
 
 # L<S06/Routine modifiers/>
 # L<S06/Parameters and arguments/>
@@ -49,3 +49,6 @@ eval_dies_ok 'proto {}', 'anonymous proto is an error';
 eval_dies_ok 'class A { only method {} }', 'anonymous only method is an error';
 eval_dies_ok 'class B { multi method {} }', 'anonymous multi method is an error';
 eval_dies_ok 'class C { proto method {} }', 'anonymous proto method is an error';
+
+# .WHAT reports Multi
+is(~&foo.WHAT, 'Multi', '.WHAT on a multi stringifies to Multi');