Fix PROCESS handling. Now all 00-parrot and 01-sanity pass and we can…

… run the spectests with the build produced right off.
rakudo · Feb 28, 2012 · 7c6ebd7 · 7c6ebd7
1 parent 662c70a
commit 7c6ebd7
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/Perl6/Metamodel/BOOTSTRAP.pm b/src/Perl6/Metamodel/BOOTSTRAP.pm
@@ -963,3 +963,7 @@ Perl6::Metamodel::ParametricRoleGroupHOW.set_stash_type(Stash, EnumMap);
 # Register default parent types.
 Perl6::Metamodel::ClassHOW.set_default_parent_type(Any);
 Perl6::Metamodel::GrammarHOW.set_default_parent_type(Grammar);
+
+# Put PROCESS in place.
+my $hll_ns := pir::get_root_global__PS('perl6');
+$hll_ns<PROCESS> := PROCESS;