git.iko.soy/distributed-process
on master help sign in
Node: Remove redundant import and constraint
da907e9Ben Gamari
src/Control/Distributed/Process/Node.hs+2−2
compare with master
unifiedsplit
@@ -70,7 +70,7 @@ import qualified Control.Exception as Exception
70 , catches
70 , catches
71 , finally
71 , finally
72 )
72 )
73−import Control.Concurrent (forkIO, forkIOWithUnmask, killThread)
73+import Control.Concurrent (forkIO, killThread)
74import Control.Distributed.Process.Internal.StrictMVar
74import Control.Distributed.Process.Internal.StrictMVar
75 ( newMVar
75 ( newMVar
76 , withMVar
76 , withMVar
@@ -1052,7 +1052,7 @@ ncEffectGetInfo from pid =
1052 , infoMonitors = Set.toList itsMons
1052 , infoMonitors = Set.toList itsMons
1053 , infoLinks = Set.toList itsLinks
1053 , infoLinks = Set.toList itsLinks
1054 }
1054 }
1055− where dispatch :: (Serializable a, Show a)
1055+ where dispatch :: (Serializable a)
1056 => Bool
1056 => Bool
1057 -> ProcessId
1057 -> ProcessId
1058 -> a
1058 -> a