is a compiler for the Raku Pogramming Language (formerly known as Perl 6).
| Telemetry.rakumod (rakudo-2020.09) | : | Telemetry.rakumod (rakudo-2020.10) |
|---|
| | |
| skipping to change at line 606 | | skipping to change at line 606 |
|---|
| | |
| my $samples := nqp::create(IterationBuffer); | | my $samples := nqp::create(IterationBuffer); |
| my int $elems = +@samples; # reify | | my int $elems = +@samples; # reify |
| my $reified := nqp::getattr(@samples,List,'$!reified'); | | my $reified := nqp::getattr(@samples,List,'$!reified'); |
| nqp::if($reified,nqp::splice($samples,$reified,0,$elems)); | | nqp::if($reified,nqp::splice($samples,$reified,0,$elems)); |
| | |
| nqp::p6bindattrinvres($self,Telemetry,'$!samples',$samples); | | nqp::p6bindattrinvres($self,Telemetry,'$!samples',$samples); |
| } | | } |
| | |
| multi method raku(Telemetry:D: --> Str:D) { | | multi method raku(Telemetry:D: --> Str:D) { |
|
| self.^name ~ ".new$!samples.raku()" | | self.^name ~ ".new$!samples.List.raku()" |
| } | | } |
| | |
| method sampler() { $!sampler } | | method sampler() { $!sampler } |
| | |
| method samples() { | | method samples() { |
| nqp::p6bindattrinvres(nqp::create(List),List,'$!reified',$!samples) | | nqp::p6bindattrinvres(nqp::create(List),List,'$!reified',$!samples) |
| } | | } |
| | |
| method AT-KEY($key) is raw { | | method AT-KEY($key) is raw { |
| nqp::ifnull( | | nqp::ifnull( |
| | | |
| End of changes. 1 change blocks. |
|---|
| 1 lines changed or deleted | | 1 lines changed or added |
|---|
"Fossies" - the Fresh Open Source Software Archive 