12 lines
160 B
Haskell
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
|