Fixed array slice with [0..^*]

```
$ perl6 -e 'my @A = 1..5; say @A[0..^*]'
(1 2 3 4)
```

Author: ufobat

doc/Language/list.pod6

@@ -475,7 +475,7 @@ mathematicians that C<Inf> equals C<Inf-1>.
     say @a[0..2];     # OUTPUT: «(1 2 3)␤»
     say @a[0..^2];    # OUTPUT: «(1 2)␤»
     say @a[0..*];     # OUTPUT: «(1 2 3 4 5)␤»
-    say @a[0..^*];    # OUTPUT: «(1 2 3 4 5)␤»
+    say @a[0..^*];    # OUTPUT: «(1 2 3 4)␤»
     say @a[0..Inf-1]; # OUTPUT: «(1 2 3 4 5)␤»
 
 =head2 Array constructor context
@@ -749,4 +749,4 @@ creature should never be passed back to unsuspecting users.
 
 =end pod
 
-# vim: expandtab softtabstop=4 shiftwidth=4 ft=perl6
+# vim: expandtab softtabstop=4 shiftwidth=4 ft=perl6