git.iko.soy/distributed-process
on master help sign in
Merge pull request #266 from haskell-distributed/fd/nc-termination

Throw NodeClosedException when the node controller is stopped.

commitc18f5259ca5a78522b4d7b442a291611c2269c46 authorFacundo Domínguez <facundominguez@gmail.com> dateThu 7 Jan 2016, 09:30 (11 years ago) parent4c0c890e2bfbeb
1 file changed+1−2
compare with master
unifiedsplit
src/Control/Distributed/Process/Node.hs+1−2
src/Control/Distributed/Process/Node.hs+1−2
@@ -765,8 +765,7 @@ nodeController = do
765765 NCMsg _ SigShutdown ->
766766 liftIO $ do
767767 NT.closeEndPoint (localEndPoint node)
768− `Exception.finally` throwIO ThreadKilled
769− -- ThreadKilled seems to make more sense than fail/error here
768+ `Exception.finally` throwIO (NodeClosedException $ localNodeId node)
770769 NCMsg (ProcessIdentifier from) (GetNodeStats nid) ->
771770 ncEffectGetNodeStats from nid
772771 unexpected ->