September 2017 Update

2017-09-23 10:01:46 +02:00 · 2017-09-23 10:01:46 +02:00 · ba8067c3b7
commit ba8067c3b7
parent bba7bfd280
14570 changed files with 153136 additions and 63871 deletions
--- a/Task/Visualize-a-tree/Perl-6/visualize-a-tree.pl6
+++ b/Task/Visualize-a-tree/Perl-6/visualize-a-tree.pl6
@ -4,7 +4,7 @@ sub visualize-tree($tree, &label, &children,
                   :@end = ('└─', '  '),
 ) {
    sub visit($node, *@pre) {
-        gather {
+        | gather {
            take @pre[0] ~ label($node);
            my @children := children($node);
            my $end = @children.end;