Skip to content

Instantly share code, notes, and snippets.

@zoffixznet

zoffixznet/p6.p6 Secret

Created April 4, 2017 19:41
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 zoffixznet/c150dfde2c4b495773b7db24657631a0 to your computer and use it in GitHub Desktop.
Save zoffixznet/c150dfde2c4b495773b7db24657631a0 to your computer and use it in GitHub Desktop.
cpan@perlbuild2~/CPANPRC/rakudo (nom)$ ^C
cpan@perlbuild2~/CPANPRC/rakudo (nom)$ gd
diff --git a/src/core/traits.pm b/src/core/traits.pm
index ff15d09..3962ba3 100644
--- a/src/core/traits.pm
+++ b/src/core/traits.pm
@@ -144,6 +144,16 @@ multi sub trait_mod:<is>(Routine:D $r, :$onlystar!) {
$r.set_onlystar();
}
multi sub trait_mod:<is>(Routine:D $r, :prec(%spec)!) {
+ nqp::if(
+ nqp::if(
+ nqp::istrue(%spec<assoc>),
+ nqp::if(
+ nqp::iseq_s(%spec<assoc>, 'list'),
+ 1,#nqp::isne_s(nqp::substr("fooooooooo", 0, 6), 'infix'),
+ )
+ ),
+ nqp::say("MEOW")
+ );
my role Precedence {
has %!prec;
proto method prec(|) { * }
cpan@perlbuild2~/CPANPRC/rakudo (nom)$
Stage start : 0.000
Stage parse : An exception occurred while evaluating a BEGIN
at SETTING::src/core/Exception.pm:63 (<ephemeral file>:throw)
from src/Perl6/World.nqp:4391 (blib/Perl6/World.moarvm:handle-begin-time-exceptions)
from src/Perl6/World.nqp:3228 (blib/Perl6/World.moarvm:add_phaser)
from gen/moar/Perl6-Actions.nqp:2116 (blib/Perl6/Actions.moarvm:statement_prefix:sym<BEGIN>)
from gen/moar/stage2/QRegex.nqp:1491 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/QRegex.moarvm:!cursor_pass)
from src/Perl6/Grammar.nqp:1711 (blib/Perl6/Grammar.moarvm:statement_prefix:sym<BEGIN>)
from gen/moar/stage2/QRegex.nqp:1573 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/QRegex.moarvm:!protoregex)
from <unknown>:1 (blib/Perl6/Grammar.moarvm:statement_prefix)
from <unknown>:1 (blib/Perl6/Grammar.moarvm:term:sym<statement_prefix>)
from gen/moar/stage2/QRegex.nqp:1573 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/QRegex.moarvm:!protoregex)
from src/Perl6/Grammar.nqp:3914 (blib/Perl6/Grammar.moarvm:termish)
from gen/moar/stage2/NQPHLL.nqp:932 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:EXPR)
from src/Perl6/Grammar.nqp:3960 (blib/Perl6/Grammar.moarvm:EXPR)
from src/Perl6/Grammar.nqp:1289 (blib/Perl6/Grammar.moarvm:statement)
from src/Perl6/Grammar.nqp:1221 (blib/Perl6/Grammar.moarvm:statementlist)
from gen/moar/stage2/NQPHLL.nqp:1164 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:LANG)
from src/Perl6/Grammar.nqp:1657 (blib/Perl6/Grammar.moarvm:FOREIGN_LANG)
from src/Perl6/Grammar.nqp:1185 (blib/Perl6/Grammar.moarvm:comp_unit)
from src/Perl6/Grammar.nqp:492 (blib/Perl6/Grammar.moarvm:TOP)
from gen/moar/stage2/QRegex.nqp:2298 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/QRegex.moarvm:parse)
from gen/moar/stage2/NQPHLL.nqp:1894 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:parse)
from gen/moar/stage2/NQPHLL.nqp:1835 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:run)
from gen/moar/stage2/NQPHLL.nqp:1845 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:)
from gen/moar/stage2/NQPHLL.nqp:1823 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:compile)
from gen/moar/stage2/NQPHLL.nqp:1569 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:eval)
from gen/moar/stage2/NQPHLL.nqp:1790 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:evalfiles)
from gen/moar/stage2/NQPHLL.nqp:1684 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:command_eval)
from src/Perl6/Compiler.nqp:42 (blib/Perl6/Compiler.moarvm:command_eval)
from gen/moar/stage2/NQPHLL.nqp:1658 (/home/cpan/CPANPRC/rakudo/install/share/nqp/lib/NQPHLL.moarvm:command_line)
from gen/moar/main.nqp:47 (perl6.moarvm:MAIN)
from gen/moar/main.nqp:38 (perl6.moarvm:<mainline>)
from <unknown>:1 (perl6.moarvm:<main>)
from <unknown>:1 (perl6.moarvm:<entry>)
Makefile:469: recipe for target 'CORE.setting.moarvm' failed
make: *** [CORE.setting.moarvm] Error 1
/home/cpan/CPANPRC/rakudo/install/bin/nqp-m tools/build/gen-cat.nqp moar -f tools/build/moar_core_sources > gen/moar/CORE.setting
The following step can take a long time, please be patient.
/home/cpan/CPANPRC/rakudo/install/bin/moar --libpath="/home/cpan/CPANPRC/rakudo/install/share/nqp/lib" --libpath="/home/cpan/CPANPRC/rakudo/install/share/nqp/lib" perl6.moarvm --nqp-lib=blib --setting=NULL --ll-exception --optimize=3 --target=mbc --stagestats --output=CORE.setting.moarvm gen/moar/CORE.setting
Stage start : 0.000
Stage parse : ^CMakefile:469: recipe for target 'CORE.setting.moarvm' failed
make: *** [CORE.setting.moarvm] Interrupt
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment