Switch some current "get_hll_globals" into "find_contextual".

rakudo · Sep 4, 2009 · 9f2b09c · 9f2b09c
1 parent a6a4f57
commit 9f2b09c
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/builtins/eval.pir b/src/builtins/eval.pir
@@ -79,7 +79,7 @@ itself can be found in src/builtins/control.pir.
   have_name:
     ##  see if we loaded this already
     .local pmc inc_hash
-    inc_hash = get_hll_global '%INC'
+    inc_hash = '!find_contextual'('%*INC')
     $I0 = exists inc_hash[name]
     unless $I0 goto require_name
     $I0 = defined inc_hash[name]
@@ -88,7 +88,7 @@ itself can be found in src/builtins/control.pir.
   require_name:
     ##  loop through @INC
     .local pmc inc_it
-    $P0 = get_hll_global '@INC'
+    $P0 = '!find_contextual'('@*INC')
     inc_it = iter $P0
   inc_loop:
     unless inc_it goto inc_end

diff --git a/src/builtins/io.pir b/src/builtins/io.pir
@@ -21,7 +21,7 @@ Parses a format string and prints formatted output according to it.
 .sub 'printf'
     .param pmc args            :slurpy
     .local pmc it, out
-    out = get_hll_global '$OUT'
+    out = '!find_contextual'('$*OUT')
     $S0 = 'sprintf'(args :flat)
     out.'print'($S0)
     .return (1)