Make .perl on Iterators eager.

rakudo · Mar 30, 2010 · 00d8d8d · 00d8d8d
1 parent 5c93380
commit 00d8d8d
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/core/Iterator.pm b/src/core/Iterator.pm
@@ -1,4 +1,8 @@
 augment class Iterator {
+    multi method perl() {
+        $.eager.perl;
+    }
+
     multi method elems() {
         my $elems = 0;
         while !(self.get ~~ EMPTY) {