X::Method::NotFound shouldn't die with no message

For RT #131492

S32-exceptions/misc.t

@@ -5,7 +5,7 @@ use lib "t/spec/packages";
 use Test;
 use Test::Util;
 
-plan 426;
+plan 427;
 
 throws-like '42 +', Exception, "missing rhs of infix", message => rx/term/;
 
@@ -960,4 +960,11 @@ throws-like 'sub foo(@array ($first, @rest)) { say @rest }; foo <1 2 3>;',
     nok $warned, 'No warning when producing error for "my $!a"';
 }
 
+# RT #131492
+{
+    throws-like q| my \foo = Callable but role :: { } |,
+        X::Method::NotFound,
+	'X::Method::NotFound does not die with "X::Method::NotFound exception produced no message"';
+}
+
 # vim: ft=perl6