[project @ 2002-12-05 14:20:56 by stolz]
authorstolz <unknown>
Thu, 5 Dec 2002 14:20:56 +0000 (14:20 +0000)
committerstolz <unknown>
Thu, 5 Dec 2002 14:20:56 +0000 (14:20 +0000)
commitda44cf1d4b1e2e878f232138495d60342113e3e6
tree032424e408273486c4bbadda6ac3ea6b222e5811
parentf46abbad26f6f63d20ac72785a81963cab77b2df
[project @ 2002-12-05 14:20:56 by stolz]
Add SA_RESETHAND (aka SA_ONESHOT) support.
Requested by: John Meacham

> module Main where

> import System.Posix.Signals

> main = do
>   installHandler sigUSR1 (Catch (print "usr1")) Nothing
>   installHandler sigUSR2 (CatchOnce (print "usr2")) Nothing
>   _ <- getLine
>   return ()
System/Posix/Signals.hsc