Merge pull request #3857 from rakudo/ambiguous-is-default

Streamline X::Multi::Ambiguous listing
rakudo · Aug 24, 2020 · b005230 · b005230
2 parents 86bac5a + b8121ce
commit b005230
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/core.c/Exception.pm6 b/src/core.c/Exception.pm6
@@ -2771,7 +2771,10 @@ my class X::Multi::Ambiguous is Exception {
         @priors = flat "Earlier failures:\n", @priors, "\nFinal error:\n " if @priors;
         @priors.join ~ join "\n",
             "Ambiguous call to '$.dispatcher.name()$cap'; these signatures all match:",
-            @.ambiguous.map(*.signature.raku)
+            @.ambiguous.map: {
+                my $sig := .signature.raku.substr(1).subst(/ \s* "-->" <-[)]>+ /);
+                .?default ?? "  $sig is default" !! "  $sig"
+            }
     }
 }