Spec .pairup always returns a Seq

Modified test is a 6.d propspec PoV: rakudo/rakudo@d73272e4c0
Raku · Oct 29, 2018 · 6f96547 · 6f96547
1 parent 9e4d81d
commit 6f96547
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/S32-basics/pairup.t b/S32-basics/pairup.t
@@ -3,11 +3,13 @@ use lib $?FILE.IO.parent(2).add: 'packages';
 use Test;
 use Test::Util;
 
-plan 5;
+plan 6;
 
 {
-    is-eqv Any.pairup, (), 'pairup on a :U invocant returns an empty List';
     my @nums = 1..6;
+    is-eqv Any.pairup, ().Seq, 'pairup on a :U invocant returns an empty Seq';
+    is-eqv @nums.pairup, (1 => 2, 3 => 4, 5 => 6).Seq,
+        'pairup on a :D invocant';
     my %h = @nums.pairup;
     is(@nums.pairup.elems, 3, 'pairup returns correct list size');
     is-deeply(%h.keys.sort, ('1', '3', '5'), 'hash constructed from pairup has correct keys');