git.iko.soy/distributed-process
on master help sign in
Node: Remove redundant import and constraint
0672887Ben 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
@@ -1060,7 +1060,7 @@ ncEffectGetInfo from pid =
1060 , infoMonitors = Set.toList itsMons
1060 , infoMonitors = Set.toList itsMons
1061 , infoLinks = Set.toList itsLinks
1061 , infoLinks = Set.toList itsLinks
1062 }
1062 }
1063− where dispatch :: (Serializable a, Show a)
1063+ where dispatch :: (Serializable a)
1064 => Bool
1064 => Bool
1065 -> ProcessId
1065 -> ProcessId
1066 -> a
1066 -> a