parrotbot/src/Types.hs

12 lines
160 B
Haskell

module Types where
import Control.Monad.Reader (ReaderT(..))
import System.IO (Handle)
data Bot = Bot
{ botSocket :: Handle
}
type Net = ReaderT Bot IO