Test suite: avoid forkOS on WASM

gregorycollins · Nov 26, 2024 · 523bdc3 · 523bdc3
1 parent 2ea4e62
commit 523bdc3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/test/suite/Data/HashTable/Test/Common.hs b/test/suite/Data/HashTable/Test/Common.hs
@@ -347,7 +347,7 @@ data Action = Lookup Int
 
 
 timeout_ :: Int -> IO a -> IO ()
-#ifdef PORTABLE
+#if defined(PORTABLE) || defined(wasm32_HOST_ARCH)
 timeout_ t m = timeout t m >>= maybe (assertFailure "timeout")
                                      (const $ return ())
 #else