Archived
1
0
Fork 0

Wrote a dynamic compilation stuff that works (unable to test reboot yet)

This commit is contained in:
Julien Dessaux 2009-08-05 01:01:47 +02:00
parent ea607ba1b1
commit 1f6c64749d
7 changed files with 183 additions and 0 deletions

23
Hsbot/Main.hs Normal file
View file

@ -0,0 +1,23 @@
module Hsbot.Main
(imain
) where
import Network
import System.IO
import System.Plugins
import qualified Config as C
import Hsbot.Core
import Hsbot.IRC
type Reboot = (Module -> Bot -> IO ())
-- | Bot's first main entry point
imain :: Module -> Reboot -> IO ()
imain modul' reboot = imain' modul' reboot newbot
-- | Bot's main entry point
imain' :: Module -> Reboot -> Bot -> IO ()
imain' modul' reboot bot = do
print C.config