Scary Lists bug

gistfile1.txt

┌─[tadzik@yavin4]─[~/src/nom] (podparser)
└─[%]─> g diff | cat
diff --git a/src/Perl6/Actions.pm b/src/Perl6/Actions.pm
index db347cb..af877b6 100644
--- a/src/Perl6/Actions.pm
+++ b/src/Perl6/Actions.pm
@@ -276,7 +276,7 @@ class Perl6::Actions is HLL::Actions {
             }
         }
         my $content := $*ST.add_constant(
-            'Array', 'type_new',
+            'List', 'type_new',
             |@children,
         );
         if $<type>.Str ~~ /^item \d*$/ {
@@ -313,7 +313,7 @@ class Perl6::Actions is HLL::Actions {
                 ?? pir::join('', $<pod_content>) !! ~$<pod_content>,
         );
         my $content := $*ST.add_constant(
-            'Array', 'type_new',
+            'List', 'type_new',
             $str<compile_time_value>
         );
         my $past := $*ST.add_constant(
@@ -351,7 +351,7 @@ class Perl6::Actions is HLL::Actions {
         $t    := subst($t, /\n$/, ''); # chomp!
         my $str := $*ST.add_constant('Str', 'str', $t);
         my $content := $*ST.add_constant(
-            'Array', 'type_new',
+            'List', 'type_new',
             $str<compile_time_value>
         );
         my $past := $*ST.add_constant(
diff --git a/src/Perl6/Grammar.pm b/src/Perl6/Grammar.pm
index 7fe2a63..b846523 100644
--- a/src/Perl6/Grammar.pm
+++ b/src/Perl6/Grammar.pm
@@ -367,7 +367,7 @@ grammar Perl6::Grammar is HLL::Grammar {
         
         {
             $*POD_PAST := $*ST.add_constant(
-                'Array', 'type_new', |$*POD_BLOCKS
+                'List', 'type_new', |$*POD_BLOCKS
             );
             $*ST.install_lexical_symbol(
                 $*UNIT, '$POD', $*POD_PAST<compile_time_value>
┌─[tadzik@yavin4]─[~/src/nom] (podparser)
└─[%]─> ./perl6 -e '1'
Null PMC access in find_method('new')
current instr.: 'eager' pc 377550 (src/gen/CORE.setting.pir:105637) (src/gen/CORE.setting:2178)
called from Sub 'STORE' pc 387947 (src/gen/CORE.setting.pir:110111) (src/gen/CORE.setting:2778)
called from Sub '_block7445' pc 367354 (src/gen/CORE.setting.pir:100664) (src/gen/CORE.setting:1359)
... call repeated 1 times
called from Sub '_block1340' pc 3507 (src/gen/CORE.setting.pir:1618) (src/gen/CORE.setting:1528)
called from Sub '_block1338' pc 14 (src/gen/CORE.setting.pir:22) (src/gen/CORE.setting:1)
called from Sub '_block13841' pc 396465 (src/gen/CORE.setting.pir:113590) (src/gen/CORE.setting:1)
called from Sub 'nqp;Perl6;ModuleLoader;_block1140' pc 2875 (src/gen/perl6-moduleloader.pir:1152) (src/Perl6/ModuleLoader.pm:115)
... call repeated 1 times