[truffle] Fix bug in coercion

src/vm/jvm/Truffle.nqp

@@ -401,7 +401,7 @@ class QAST::TruffleCompiler {
                 } elsif $desired == $INT {
                     return TAST.new($OBJ, ['smart-intify', $tast.tree]);
                 } elsif $desired == $NUM {
-                    return TAST.new($OBJ, ['smart-numify', $tast.tree]);
+                    return TAST.new($NUM, ['smart-numify', $tast.tree]);
                 }
             }
 

src/vm/jvm/runtime/org/perl6/nqp/truffle/NQPHash.java

@@ -0,0 +1,23 @@
+package org.perl6.nqp.truffle.runtime;
+
+import java.util.ArrayList;
+
+public final class NQPHash {
+    HashMap<String, Object> contents;
+
+    public NQPHash() {
+        this.contents = new new HashMap<String, Object>();
+    }
+
+    public Object atkey(String key) {
+        return contents.get(key);
+    }
+
+    public Object bindkey(String key, Object value) {
+        return contents.put(key, value);
+    }
+
+    public int elems() {
+        return contents.size();
+    }
+}