Revert recording of loaded CORES

It doesn't have any use anymore.
rakudo · Jul 12, 2019 · 43bf910 · 43bf910
1 parent 075e60a
commit 43bf910
Showing 1 changed file with 0 additions and 14 deletions.
diff --git a/src/Perl6/World.nqp b/src/Perl6/World.nqp
@@ -193,8 +193,6 @@ class Perl6::World is HLL::World {
         # The outermost block is at the bottom, the latest block is on top.
         has @!PADS_AND_THUNKS;
 
-        has @!SETTINGS;
-
         # The stack of code objects; phasers get attached to the top one.
         has @!CODES;
 
@@ -237,7 +235,6 @@ class Perl6::World is HLL::World {
 
         method BUILD(:$handle, :$description) {
             @!PADS := [];
-            @!SETTINGS := [];
             @!PADS_AND_THUNKS := [];
             @!CODES := [];
             @!stub_check := [];
@@ -255,10 +252,6 @@ class Perl6::World is HLL::World {
             @!PADS
         }
 
-        method SETTINGS() {
-            @!SETTINGS
-        }
-
         method create_block($/) {
             # Create pad, link to outer, annotate with creating statement.
             my $pad := QAST::Block.new( QAST::Stmts.new( :node($/) ) );
@@ -304,10 +297,6 @@ class Perl6::World is HLL::World {
             @!PADS_AND_THUNKS.pop();
         }
 
-        method push_SETTING($s) {
-            @!SETTINGS[+@!SETTINGS] := $s;
-        }
-
         # Gets the top block or thunk.
         method cur_block_or_thunk() {
             @!PADS_AND_THUNKS[+@!PADS_AND_THUNKS - 1]
@@ -685,7 +674,6 @@ class Perl6::World is HLL::World {
             if nqp::eqat($setting_name, 'NULL', 0) {
                 $*COMPILING_CORE_SETTING := 1;
                 $*SET_DEFAULT_LANG_VER := 0;
-                self.context.push_SETTING($*UNIT);
             }
             self.load_setting($/,$setting_name);
             $*UNIT.annotate('IN_DECL', 'mainline');
@@ -965,8 +953,6 @@ class Perl6::World is HLL::World {
             $!setting_fixup_task := $fixup;
             # self.add_load_dependency_task(:deserialize_ast($fixup), :fixup_ast($fixup));
 
-            self.context().push_SETTING($*UNIT_OUTER);
-
             return nqp::ctxlexpad($setting);
         }
     }