Skip to content

Instantly share code, notes, and snippets.

@tadzik
Created April 23, 2016 15:45
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save tadzik/3e32043c3c25456517cb33b57c642ac1 to your computer and use it in GitHub Desktop.
Save tadzik/3e32043c3c25456517cb33b57c642ac1 to your computer and use it in GitHub Desktop.
┌─[tadzik@yavin]─[~/.rakudobrew/moar-nom] (remotes/origin/HEAD)*
└─[%]─> g diff
diff --git a/src/core/Main.pm b/src/core/Main.pm
index 811b665..017a32a 100644
--- a/src/core/Main.pm
+++ b/src/core/Main.pm
@@ -175,6 +175,9 @@ my sub MAIN_HELPER($retval = 0) {
if +@matching_candidates {
$m(|@($p), |%($n));
return;
+ CATCH { default {
+ say $_.perl;
+ }}
}
# We could not find the correct MAIN to dispatch to!
┌─[tadzik@yavin]─[~/.rakudobrew/moar-nom] (remotes/origin/HEAD)*
└─[%]─> ./perl6 ~/test.pl
X::AdHoc.new(payload => "Constraint type check failed for parameter '\@args'")
Usage:
/home/tadzik/test.pl [<args> ...]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment