s/$!items/$!reified/ in typed array BIND-POS.

rakudo · Aug 15, 2015 · 8450fbb · 8450fbb
1 parent 91b2dd6
commit 8450fbb
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/core/Array.pm b/src/core/Array.pm
@@ -470,12 +470,12 @@ my class Array { # declared in BOOTSTRAP
             my int $ipos = $pos;
             my $todo := nqp::getattr(self, List, '$!todo');
             $todo.reify-at-least($ipos + 1) if $todo.DEFINITE;
-            nqp::bindpos(nqp::getattr(self, List, '$!items'), $ipos, bindval)
+            nqp::bindpos(nqp::getattr(self, List, '$!reified'), $ipos, bindval)
         }
         multi method BIND-POS(int $pos, TValue \bindval) is rw {
             my $todo := nqp::getattr(self, List, '$!todo');
             $todo.reify-at-least($pos + 1) if $todo.DEFINITE;
-            nqp::bindpos(nqp::getattr(self, List, '$!items'), $pos, bindval)
+            nqp::bindpos(nqp::getattr(self, List, '$!reified'), $pos, bindval)
         }
         multi method perl(::?CLASS:D \SELF:) {
             my $args = self.map({ ($_ // TValue).perl(:arglist) }).join(', ');