@@ -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
@@ -1052,7 +1052,7 @@ ncEffectGetInfo from pid =
10521052 , infoMonitors = Set.toList itsMons
10531053 , infoLinks = Set.toList itsLinks
10541054 }
1055− where dispatch :: (Serializable a, Show a)
1055+ where dispatch :: (Serializable a)
10561056 => Bool
10571057 -> ProcessId
10581058 -> a