Fix Seq already iterated issues with hyper ops

Have deepmap always return a List as the spec still requires. This should fix several issues with already iterated Seq.
rakudo · Aug 22, 2015 · 185fc07 · 185fc07
1 parent 5c509b1
commit 185fc07
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/core/metaops.pm b/src/core/metaops.pm
@@ -491,7 +491,7 @@ multi sub deepmap(\op, \obj) {
             ?? obj
             !! obj.list;
 
-    Seq.new(class :: does SlippyIterator {
+    my \result := class :: does SlippyIterator {
         has &!block;
         has $!source;
 
@@ -552,7 +552,9 @@ multi sub deepmap(\op, \obj) {
                 $result
             }
         }
-    }.new(op, iterable.iterator));
+    }.new(op, iterable.iterator);
+
+    nqp::iscont(obj) ?? List.from-iterator(result).item !! List.from-iterator(result)
 }
 
 multi sub deepmap(\op, Associative \h) {