Spec Array.List fills holes with Nils

RT#132261: https://rt.perl.org/Ticket/Display.html?id=132261 Rakudo fix: rakudo/rakudo@e135121914
Raku · Oct 10, 2017 · 2257ab3 · 2257ab3
1 parent c537352
commit 2257ab3
Showing 1 changed file with 9 additions and 1 deletion.
diff --git a/S32-array/delete.t b/S32-array/delete.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 33;
+plan 34;
 
 =begin description
 
@@ -173,6 +173,14 @@ subtest '.Slip and .List on Arrays with holes' => {
     }
 }
 
+# RT #132261
+{
+    (my @a = <a b c>)[1]:delete;
+    @a[5] = 70;
+    my @b is default(42) = @a.List;
+    is-deeply @b, ["a", 42, "c", 42, 42, 70], 'Array.List fills holes with Nils';
+}
+
 # TODO More exclusive bounds checks
 
 # TODO W/ multiple ranges