@@ -70,7 +70,7 @@ import qualified Control.Exception as Exception
7070 , catches
7171 , finally
7272 )
73−import Control.Concurrent (forkIO, forkIOWithUnmask, killThread)
73+import Control.Concurrent (forkIO, killThread)
7474import Control.Distributed.Process.Internal.StrictMVar
7575 ( newMVar
7676 , withMVar
@@ -1060,7 +1060,7 @@ ncEffectGetInfo from pid =
10601060 , infoMonitors = Set.toList itsMons
10611061 , infoLinks = Set.toList itsLinks
10621062 }
1063− where dispatch :: (Serializable a, Show a)
1063+ where dispatch :: (Serializable a)
10641064 => Bool
10651065 -> ProcessId
10661066 -> a