diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2021-09-27 02:02:19 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2021-09-27 02:02:19 +0100 |
| commit | d2753d8c0db52be324b4548e8a6685322ab91d68 (patch) | |
| tree | c092692db669006d54803741ac83611375dc0496 /challenge-131 | |
| parent | 0228a682e5235ca453df555e23466cef502a5b9a (diff) | |
| parent | 0be43f2c1a2a17aae3a034c895c4b891e30486d6 (diff) | |
| download | perlweeklychallenge-club-d2753d8c0db52be324b4548e8a6685322ab91d68.tar.gz perlweeklychallenge-club-d2753d8c0db52be324b4548e8a6685322ab91d68.tar.bz2 perlweeklychallenge-club-d2753d8c0db52be324b4548e8a6685322ab91d68.zip | |
Merge pull request #4928 from andemark/branch-for-challenge-131
minor edit
Diffstat (limited to 'challenge-131')
| -rw-r--r-- | challenge-131/mark-anderson/raku/ch-1.raku | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/challenge-131/mark-anderson/raku/ch-1.raku b/challenge-131/mark-anderson/raku/ch-1.raku index 5f86c5e82d..065a89f298 100644 --- a/challenge-131/mark-anderson/raku/ch-1.raku +++ b/challenge-131/mark-anderson/raku/ch-1.raku @@ -10,11 +10,9 @@ is-deeply consecutive-arrays(1, 2, 3, 4, 5), ([1, 2, 3, 4, 5],); sub consecutive-arrays(**@N) { - my $i; - my @consecutives = gather for @N.rotor(2 => -1, :partial) { - $i++; + state $i++; if .head !== .tail - 1 { |