Skip to content

Commit 95892c1

Browse files
committed
following perl6 documentation guide lines
1 parent 0a5be13 commit 95892c1

File tree

1 file changed

+4
-6
lines changed

1 file changed

+4
-6
lines changed

doc/Language/control.pod6

Lines changed: 4 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -542,20 +542,18 @@ See also the documentaion for C<hyper> and C<race> in class L<Map|/type/Map>.
542542
543543
=for code
544544
my $primes_h = hyper for ^10_000 -> $number { $number if $number.is-prime };
545-
say $primes_h.elems;
546-
say $primes_h.tail: 5; # OUTPUT: (9931 9941 9949 9967 9973)
545+
say $primes_h.elems; # OUTPUT: «1229␤»
546+
say $primes_h.tail: 5; # OUTPUT: «(9931 9941 9949 9967 9973)␤»
547547
548548
with C<hyper> the order of elements is preserved.
549549
550550
=for code
551-
my $primes_r = race for ^10_000 -> $number { $number if $number.is-prime };
552-
say $primes_r.elems;
553-
say $primes_r.tail: 5; # OUTPUT: (9871 9883 9887 9901 9907)
551+
my $primes_r = race for ^10_000 -> $number { $number if $number.is-prime };
552+
say $primes_r.elems; # OUTPUT: «1229␤»
554553
555554
Unlike hyper, C<race> does not preserve the order of elements.
556555
557556
558-
559557
=head1 X<gather/take|control flow,gather take>
560558
561559
X<|lazy list,gather>X<|lazy list,take>

0 commit comments

Comments
 (0)