adyxax/hsbot
Archived
1
0
Fork 0
Code Issues Activity

renamed "Server" algebraic data type to "IrcServer"

Browse source
This commit is contained in:
Julien Dessaux 2009-08-06 00:09:56 +02:00
parent 1f6c64749d
commit 45ebb68aa0
3 changed files with 9 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Hsbot/IRC.hs
View file

@ -22,9 +22,9 @@ data IrcInput = Cmd User Channel (Command, Maybe String) -- a regular command
-- | Data that can go over the remote channel
data IrcOutput = Str String -- a regular string
| Quit (Server, Handle) -- a quit message from a server
| Join (Server, Channel) -- joined a channel
| Part (Server, Channel) -- parted the channel
| Quit (IrcServer, Handle) -- a quit message from a server
| Join (IrcServer, Channel) -- joined a channel
| Part (IrcServer, Channel) -- parted the channel
| Reboot -- reboot message sent
| Nil -- signifies thread death, only happens after reboot
deriving (Eq,Show)