Added an X::Cannot::Map exception

rakudo · Mar 12, 2019 · fd8a00a · fd8a00a
1 parent 6e8df01
commit fd8a00a
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/src/core/Exception.pm6 b/src/core/Exception.pm6
@@ -2149,6 +2149,15 @@ my class X::Sequence::Deduction is Exception {
     }
 }
 
+my class X::Cannot::Map is Exception {
+    has $.what   = "(<unknown type>)";
+    has $.using  = "(<an unknown expression>)";
+    has $.suggestion;
+    method message() {
+        my $message = "Cannot map a $.what using $.using";
+        $.suggestion ?? "$message\n$.suggestion" !! $message
+    }
+}
 my class X::Cannot::Lazy is Exception {
     has $.action;
     has $.what;