From b87755c01b5779bb42215878446d24009b3041e0 Mon Sep 17 00:00:00 2001
From: pmichaud <pmichaud@pobox.com>
Date: Fri, 4 Sep 2009 16:02:35 -0500
Subject: [PATCH] Move more built-in contextuals into PROCESS:: .

---
 src/builtins/globals.pir | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/builtins/globals.pir b/src/builtins/globals.pir
index bca40086252..59b45688303 100644
--- a/src/builtins/globals.pir
+++ b/src/builtins/globals.pir
@@ -22,7 +22,7 @@ src/builtins/globals.pir - initialize miscellaneous global variables
     p6meta.'register'('Env', 'parent'=>$P0, 'protoobject'=>$P0)
     .local pmc env
     env = root_new ['parrot';'Env']
-    set_hll_global '%ENV', env
+    set_hll_global ['PROCESS'], '%ENV', env
 
     ##  set up @*INC
     $S0 = env['PERL6LIB']
@@ -41,17 +41,17 @@ src/builtins/globals.pir - initialize miscellaneous global variables
     info = sysinfo .SYSINFO_PARROT_OS
     $P0 = new ['Str']
     $P0 = info
-    set_hll_global '$OS', $P0
+    set_hll_global ['PROCESS'], '$OS', $P0
 
     info = sysinfo .SYSINFO_PARROT_OS_VERSION
     $P0 = new ['Str']
     $P0 = info
-    set_hll_global '$OSVER', $P0
+    set_hll_global ['PROCESS'], '$OSVER', $P0
 
     info = interpinfo .INTERPINFO_EXECUTABLE_FULLNAME
     $P0 = new ['Str']
     $P0 = info
-    set_hll_global '$EXECUTABLE_NAME', $P0
+    set_hll_global ['PROCESS'], '$EXECUTABLE_NAME', $P0
 
     ## create basic $*CWD
     .local pmc os