Merge pull request #1144 from skids/rt126523

Fix ::("GLOBAL") for RT#126523
rakudo · Aug 30, 2017 · f1b0863 · f1b0863
2 parents e3af662 + 1f6a782
commit f1b0863
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/core/operators.pm b/src/core/operators.pm
@@ -613,7 +613,11 @@ sub INDIRECT_NAME_LOOKUP($root, *@chunks) is raw {
             nqp::if(
               GLOBAL::.EXISTS-KEY($first),
               GLOBAL::.AT-KEY($first),
-              X::NoSuchSymbol.new(symbol => $name).fail
+              nqp::if(
+		nqp::iseq_s($first, 'GLOBAL'),
+		GLOBAL,
+                X::NoSuchSymbol.new(symbol => $name).fail
+              )
             )
           ))),
         nqp::while(