Make nqp::accept() less wrong, and thus make it actually work

Author: Tadeusz Sośnierz

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

@@ -391,7 +391,8 @@ public static SixModelObject accept(SixModelObject obj, ThreadContext tc) {
         IOHandleInstance h = (IOHandleInstance)obj;
         NotQuiteSocket sock = (NotQuiteSocket)h.handle;
         NotQuiteSocket newsock = sock.accept(tc);
-        IOHandleInstance ret = new IOHandleInstance();
+        SixModelObject IOType = tc.curFrame.codeRef.staticInfo.compUnit.hllConfig.ioType; 
+        IOHandleInstance ret = (IOHandleInstance)IOType.st.REPR.allocate(tc, IOType.st);
         ret.handle = newsock;
         return (SixModelObject)ret;
     }