Permalink
Browse files

Also fix setting loading; PerlJam++.

  • Loading branch information...
jnthn committed Sep 17, 2012
1 parent ec413ef commit 43ceae028266150c9408236975fd1beab1151afc
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/Perl6/ModuleLoader.pm
@@ -270,11 +270,11 @@ class Perl6::ModuleLoader {
# Load it.
my $*CTXSAVE := self;
my $*MAIN_CTX;
- my $preserve_global := pir::get_hll_global__Ps('GLOBAL');
+ my $preserve_global := pir::get_root_global__Ps('perl6'){'GLOBAL'};
pir::nqp_disable_sc_write_barrier__v();
pir::load_bytecode__vS($path);
pir::nqp_enable_sc_write_barrier__v();
- pir::set_hll_global__vsP('GLOBAL', $preserve_global);
+ pir::get_root_global__Ps('perl6'){'GLOBAL'} := $preserve_global;
unless nqp::defined($*MAIN_CTX) {
nqp::die("Unable to load setting $setting_name; maybe it is missing a YOU_ARE_HERE?");
}

0 comments on commit 43ceae0

Please sign in to comment.