This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
X: 5 | |
T: The Road To Lisdoonvarna | |
M: 4/4 | |
L: 1/8 | |
R: reel | |
K: Dmix | |
DAAG ABcA|GE~E2cE~E2|DAAG ABcA|GBAG FD~D2:| | |
defd cA~A2|BG~G2 cA~A2|defd cA~A2|[1 BGAG FD~D2:|[2 BGAG FGEF:| |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Type check failed in binding $key; expected 'Any' but got 'Mu' | |
at src/gen/m-CORE.setting:12156 (/Users/colomon/.rakudobrew/moar-1ad58fceeba32a81769aa3f69402cf749c5f2de4/install/languages/perl6/runtime/CORE.setting.moarvm:throw:88) | |
from src/gen/m-CORE.setting:13612 (/Users/colomon/.rakudobrew/moar-1ad58fceeba32a81769aa3f69402cf749c5f2de4/install/languages/perl6/runtime/CORE.setting.moarvm::55) | |
from src/gen/m-BOOTSTRAP.nqp:236 (/Users/colomon/.rakudobrew/moar-1ad58fceeba32a81769aa3f69402cf749c5f2de4/install/languages/nqp/lib/Perl6/BOOTSTRAP.moarvm::18) | |
from src/gen/m-BOOTSTRAP.nqp:2867 (/Users/colomon/.rakudobrew/moar-1ad58fceeba32a81769aa3f69402cf749c5f2de4/install/languages/nqp/lib/Perl6/BOOTSTRAP.moarvm::133) | |
from src/gen/m-CORE.setting:9766 (/Users/colomon/.rakudobrew/moar-1ad58fceeba32a81769aa3f69402cf749c5f2de4/install/languages/perl6/runtime/CORE.setting.moarvm:infix:<=>>:9) | |
from src/gen/m-CORE.setting:19538 (/Users/colomon/.rakudobrew/moar-1ad58fceeba32a81769aa3f69402cf749c5f2de4/install/l |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[{"version":"*","source-url":"git://github.com/tadzik/perl6-Acme-Meow.git","depends":[],"description":"The kitty you always wanted, now in Perl 6","name":"Acme::Meow"},{"name":"JSON::Tiny","description":"A minimal JSON (de)serializer","source-url":"git://github.com/moritz/json.git","version":"*","depends":[]},{"description":"Damian Conway's Perl 6 testing module","name":"Testing","source-type":"git","version":"*","source-url":"git://github.com/colomon/perl6-Testing.git","depends":[]},{"description":"Simple Mandelbrot Set scripts","name":"mandelbrot","source-type":"git","source-url":"git://github.com/colomon/mandelbrot.git","version":"*","depends":[]},{"source-url":"git://github.com/colomon/io-prompter.git","version":"*","name":"IO::Prompter","repo-url":"git://github.com/colomon/io-prompter.git","depends":["Testing"],"source-type":"git","description":"Damian Conway's IO::Prompter","repo-type":"git"},{"name":"Math::Polynomial","description":"Simple polynomial class","depends":[],"source-url":"git://github.com/c |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
if $n ~~ Callable { | |
$n = $n(+@src) + 1; | |
} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Failed to connect: connection timed out | |
in method initialize at src/gen/m-CORE.setting:22508 | |
in method new at src/gen/m-CORE.setting:22492 | |
in method dispatch:<.=> at src/gen/m-CORE.setting:1313 | |
in method make_request at lib/LWP/Simple.pm:197 | |
in method request_shell at lib/LWP/Simple.pm:65 | |
in method post at lib/LWP/Simple.pm:32 | |
in block <unit> at t/custom-headers-and-content.t:9 | |
t/custom-headers-and-content.t .. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
sub CompareObjectInstances($model-instances, $current-instances) { | |
# each of those is a list of systems | |
my $tolerance = 1e-4; | |
my @current = @$current-instances; | |
for @$model-instances -> $model { | |
my $match; | |
my $shortest-distance = Inf; | |
for @current.kv -> $i, $current { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
use v6; | |
sub simple-intepreter($input) { | |
my %defined-words; | |
my @stack; | |
my $defining = False; | |
sub run-words(@words is copy) { | |
while $_ = @words.shift { | |
if $defining { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
my @b := 1, 2, 4 ... 65536; | |
my @a := do for @b { | |
.say; | |
$_ ** 2; | |
} | |
say @a[3]; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
my @a := do for 1..20 { | |
.say; | |
$_ ** 2; | |
} | |
say @a[3]; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
diff --git a/src/core/metaops.pm b/src/core/metaops.pm | |
index 1b87ef7..a92f8ec 100644 | |
--- a/src/core/metaops.pm | |
+++ b/src/core/metaops.pm | |
@@ -96,6 +96,25 @@ sub METAOP_ZIP(\op, &reduce) { | |
} | |
} | |
+sub METAOP_CONTAINER_COMPARE(\op, &reduce) { | |
+ -> |lol { |