@@ -44,6 +44,7 @@ data Timeout = Timeout Integer | DefaultTimeout deriving (Eq, Show)
4444type Request = HTTP.Request
4545type Response = HTTP.Response BL.ByteString
4646
47+-- TODO: Add more Signals or use an existing lib
4748data Signal = SIGHUP
4849 | SIGINT
4950 | SIGQUIT