module Event where

import Blessings
import Scanner
import qualified Hirc

data Event =
    EFlash (Blessings String) |
    EScan Scan |
    EReload |
    EResize Int Int |
    EPutLn String |
    EHircConnect Hirc.Bot |
    EHircMessage Hirc.Message |
    EHircError Hirc.Error |
    ETick