diff options
| -rw-r--r-- | Cmd.hs | 10 |
1 files changed, 10 insertions, 0 deletions
@@ -0,0 +1,10 @@ +module Cmd where + +import State + +data Cmd = Cmd String String (State -> IO ()) + +instance Show Cmd where + show (Cmd a b _) = a ++ " - " ++ b + + |
![]() |
index : hsbot | |
| An IRC bot written in Haskell |
| summaryrefslogtreecommitdiff |
| -rw-r--r-- | Cmd.hs | 10 |
@@ -0,0 +1,10 @@ +module Cmd where + +import State + +data Cmd = Cmd String String (State -> IO ()) + +instance Show Cmd where + show (Cmd a b _) = a ++ " - " ++ b + + |