fix: execute deleteGlobalRefNonFinalized on a separate thread

nbacquey · nbacquey · commit ceb903fd4148 · 2020-07-17T15:47:40.000+02:00
Fixes #75
diff --git a/jvm/src/common/Language/Java/Unsafe.hs b/jvm/src/common/Language/Java/Unsafe.hs
@@ -558,7 +558,7 @@ reifyMVector mk finalize jobj0 = do
     n <- getArrayLength jobj
     ptr <- mk jobj
     fptr <- newForeignPtr ptr $ finalize jobj ptr
-                                  `finally` deleteGlobalRefNonFinalized jobj
+                                  `finally` runInAttachedThread (deleteGlobalRefNonFinalized jobj)
     return (MVector.unsafeFromForeignPtr0 fptr (fromIntegral n))
 
 reflectMVector
