lizmat

    role ProxyTweak is Proxy {
        method new(:&FETCH!, :&STORE!, *%_) is raw {
            my $self := self.Proxy::new(:&FETCH,:&STORE);
            $self.VAR.TWEAK(|%_);
            $self
        }
    }

    class A does ProxyTweak {

lizmat

$ perl Configure.pl --gen-moar --make-install; date
===ATTENTION===
  No --prefix supplied, building and installing to /Users/liz/Github/rakudo.moar/install
Found /Users/liz/Github/rakudo.moar/install/bin/nqp-m (backend moar)
Using /Users/liz/Github/rakudo.moar/install/bin/nqp-m (version 2020.06-16-g6bdf69921 / MoarVM 2020.06-34-gd564695f6).
Cleaning up ...
+++ Checking for moar NQP version
+++ Expanding	gen/moar/main-version.nqp
+++ Generating	gen/moar/rakudo.nqp
+++ Generating	gen/moar/Grammar.nqp

lizmat

diff --git a/src/Perl6/Metamodel/MethodContainer.nqp b/src/Perl6/Metamodel/MethodContainer.nqp
index 50b33a83b..f25b061a4 100644
--- a/src/Perl6/Metamodel/MethodContainer.nqp
+++ b/src/Perl6/Metamodel/MethodContainer.nqp
@@ -14,11 +14,11 @@ role Perl6::Metamodel::MethodContainer {
     has %!cache;
 
     # Add a method.
-    method add_method($obj, $name, $code_obj) {
+    method add_method($obj, $name, $code_obj, :$force) {

lizmat

diff --git a/src/core.c/Seq.pm6 b/src/core.c/Seq.pm6
index 8b06b1628..f9d5f1643 100644
--- a/src/core.c/Seq.pm6
+++ b/src/core.c/Seq.pm6
@@ -5,6 +5,9 @@ my class Seq is Cool does Iterable does Sequence {
     # way through. Can only be obtained once.
     has Iterator $!iter;
 
+    # The number of values that have been produced
+    has int $!produced;

lizmat

proto sub slurp(|) {*}
multi sub slurp(*%_) { $*ARGFILES.slurp(|%_) }
multi sub slurp(IO::Handle:D $fh, *%_) {   $fh.slurp(|%_) }
multi sub slurp(IO()       $path, *%_) { $path.slurp(|%_) }

proto sub spurt($, $, |) {*}
multi sub spurt(IO::Handle:D $fh, $data, *%_) {   $fh.spurt($data, |%_) }
multi sub spurt(IO()       $path, $data, *%_) { $path.spurt($data, |%_) }

lizmat

my %b is Bag = "aa.txt".IO.lines.map: -> $line {
    my int @evenodd = 0,0;
    ++@evenodd[$_ % 2] for $line.words.skip(2).head(5);
    @evenodd.join(" ");
}

for %b.sort -> (:$key, :$value) {
    say "$key --> $value"
}

lizmat

The people mentioned here have been contributors to the various stages of the development of the Raku Programming Language, but unfortunately have departed this existence. We thank them for their contributions and hope to keep their memory alive here, as well as other places.

Jonathan Scott Duff (perlpilot)

In the early days of the Rakudo implementation, Jonathan Scott Duff implemented many of the NQP and Raku features that we take for granted now. In later years, he kept a very observant eye on developments in

lizmat

Sad news. Our dear friend Jeff Goff has died in a scuba diving accident. He told me and many others about how he looked forward to learning more about scuba diving, getting more experienced in it, during the JoCo Cruise ( https://jococruise2020.sched.com/jeff_goff.1zitf4ff ). Apparantly, something went horribly wrong.

I have spent many hours with Jeff, not in the least when he broke his hip in Spain during the Perl conference in Granada, and I took it upon me to take care of several things for him. He has stayed as a guest at least twice in my home. I have learned to know Jeff as a warm, loving man, with a great sense of humor, wonderful ideas, and always helpful. Last time I saw him when he took over from me at the Perl & Raku booth at FOSDEM in Brussels.

Needless to say, but it needs to be said anyway: Liz and I will miss him terribly. The Perl & Raku communities will miss him dearly, as he was one volunteer who has done a lot of things to make things happen, to make things better.

Please do not

lizmat

            - QAST::Block(:cuid(1)) <sunk> :statement_id<1> :outer<?> :in_stmt_mod<?> :count<?> :code_object<?>
              - QAST::Stmts 
                - QAST::Var(lexical $whatevercode_arg_1 :decl(static)) 
                - QAST::Var(local __lowered_lex_1 :decl(var))  :whatever-var<?>
                - QAST::Var(local __lowered_param__1 :decl(param)) 
                  - QAST::Op(bind) 
                    - QAST::Var(local __lowered_param__1) 
                    - QAST::Op(hllize) 
                      - QAST::Var(local __lowered_param__1) 
                  - QAST::Op(bind) 

lizmat

looking up EXPORTHOW
looking up Rakudo::Internals::CompilerServices
looking up Block
looking up Metamodel::DefiniteHOW
looking up Failure
looking up List
looking up Map
looking up X::Attribute::Required
looking up Block
looking up Mu