Added tests for R#2420

Raku · Oct 24, 2018 · 86dc2d1 · 86dc2d1
1 parent bd7bdb8
commit 86dc2d1
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/S06-other/introspection.t b/S06-other/introspection.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 12;
+plan 18;
 
 # L<S06/Other matters/Introspection>
 
@@ -40,3 +40,10 @@ is(&multi-sub.cando(\()).[0].(),"m3","you can invoke through introspection");
     ok(\(1)   ~~ $sig,"junction sig matches second candidate");
     ok(\()    ~~ $sig, "junction sig matches third candidate");
 }
+
+# R#2420
+for (* == 42), -> $ { } -> &callable {
+    is &callable.cando( \() ).elems,       0, 'Whatevercode with \()';
+    is &callable.cando( \(666) ).elems,    1, 'Whatevercode with \(666)';
+    is &callable.cando( \(666,42) ).elems, 0, 'Whatevercode with \(666,42)';
+}