.eager shouldn't flatten

This fixes an issue with ((1, (2, 3)) »+« (4, (5, 6)))
rakudo · Mar 11, 2015 · 1d05014 · 1d05014
1 parent c2a1ddf
commit 1d05014
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/src/core/Any.pm b/src/core/Any.pm
@@ -57,10 +57,10 @@ my class Any { # declared in BOOTSTRAP
 
     proto method eager(|) { * }
     multi method eager(Any:U:) {
-        nqp::p6list(nqp::list(),     List, Bool::True).eager;
+        nqp::p6list(nqp::list(),     List, Mu).eager;
     }
     multi method eager(Any:D:) {
-        nqp::p6list(nqp::list(self), List, Bool::True).eager;
+        nqp::p6list(nqp::list(self), List, Mu).eager;
     }
 
     proto method hash(|) { * }

diff --git a/src/core/Parcel.pm b/src/core/Parcel.pm
@@ -74,6 +74,7 @@ my class Parcel does Positional { # declared in BOOTSTRAP
     method flat()  { nqp::p6list(nqp::clone($!storage), List, Bool::True) }
     method list()  { nqp::p6list(nqp::clone($!storage), List, Mu) }
     method lol()   { nqp::p6list(nqp::clone($!storage), LoL, Mu) }
+    method eager() { nqp::p6list(nqp::clone($!storage), List, Mu) }
 
     method reverse() {
         my Mu $reverse  := nqp::list();