test for RT #76584, return value of .can should stringify

Author: moritz

S12-introspection/can.t

@@ -8,7 +8,7 @@ Tests for can.
 
 =end pod
 
-plan 23;
+plan 24;
 
 # L<S12/"Introspection"/Unlike in Perl 5 where .can returns a single Code object>
 
@@ -97,4 +97,7 @@ my $pup = Puppy.new();
     is $found, "yapbow", "subclass got right methods called (on proto)";
 }
 
+# RT #76584
+ok Str.can('split') ~~ /split/, 'return value of .can stringifies sensibly';
+
 # vim: ft=perl6