Typo
[packages/base.git] / tests / topHandler03.hs
1 import System.Posix.Signals
2 import System.Exit
3 import Data.Bits
4
5 -- Test that a ExitFailure representing SIGTERM causes
6 -- the process to terminate by killing itself with SIGTERM
7
8 main = exitWith (ExitFailure (fromIntegral (-sigTERM)))