Implement nqp::[get|bind]hllsym for JVM.

Author: jnthn

src/vm/jvm/QAST/Compiler.nqp

@@ -1891,6 +1891,8 @@ QAST::OperationsJAST.map_classlib_core_op('getcomp', $TYPE_OPS, 'getcomp', [$RT_
 QAST::OperationsJAST.map_classlib_core_op('bindcomp', $TYPE_OPS, 'bindcomp', [$RT_STR, $RT_OBJ], $RT_OBJ, :tc);
 QAST::OperationsJAST.map_classlib_core_op('getcurhllsym', $TYPE_OPS, 'getcurhllsym', [$RT_STR], $RT_OBJ, :tc);
 QAST::OperationsJAST.map_classlib_core_op('bindcurhllsym', $TYPE_OPS, 'bindcurhllsym', [$RT_STR, $RT_OBJ], $RT_OBJ, :tc);
+QAST::OperationsJAST.map_classlib_core_op('gethllsym', $TYPE_OPS, 'gethllsym', [$RT_STR, $RT_STR], $RT_OBJ, :tc);
+QAST::OperationsJAST.map_classlib_core_op('bindhllsym', $TYPE_OPS, 'bindhllsym', [$RT_STR, $RT_STR, $RT_OBJ], $RT_OBJ, :tc);
 QAST::OperationsJAST.map_classlib_core_op('sethllconfig', $TYPE_OPS, 'sethllconfig', [$RT_STR, $RT_OBJ], $RT_OBJ, :tc);
 QAST::OperationsJAST.map_classlib_core_op('loadbytecode', $TYPE_OPS, 'loadbytecode', [$RT_STR], $RT_STR, :tc);
 QAST::OperationsJAST.map_classlib_core_op('usecompilerhllconfig', $TYPE_OPS, 'usecompilerhllconfig', [], $RT_INT, :tc);

src/vm/jvm/runtime/org/perl6/nqp/runtime/Ops.java

@@ -2855,6 +2855,19 @@ public static SixModelObject bindcurhllsym(String name, SixModelObject value, Th
         hllSyms.put(name, value);
         return value;
     }
+    public static SixModelObject gethllsym(String hllName, String name, ThreadContext tc) {
+        HashMap<String, SixModelObject> hllSyms = tc.gc.hllSyms.get(hllName);
+        return hllSyms == null ? null : hllSyms.get(name);
+    }
+    public static SixModelObject bindhllsym(String hllName, String name, SixModelObject value, ThreadContext tc) {
+        HashMap<String, SixModelObject> hllSyms = tc.gc.hllSyms.get(hllName);
+        if (hllSyms == null) {
+            hllSyms = new HashMap<String, SixModelObject>();
+            tc.gc.hllSyms.put(hllName, hllSyms);
+        }
+        hllSyms.put(name, value);
+        return value;
+    }
     public static String loadbytecode(String filename, ThreadContext tc) {
         new LibraryLoader().load(tc, filename);
         return filename;