Process Termination

Process Termination

import Prelude
import Control.Process (isAlive, exitProc)

-- Exit the current process
exit :normal

go :: Process Boolean
go = do
  pid <- spawn (receive _ -> return ())
  exitProc pid :reason
  isAlive pid