From 1f6c64749d39eb31f171b7fa3a44cbe396bbf071 Mon Sep 17 00:00:00 2001
From: Julien Dessaux
Date: Wed, 5 Aug 2009 01:01:47 +0200
Subject: Wrote a dynamic compilation stuff that works (unable to test reboot
 yet)

---
 Hsbot/Main.hs | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 Hsbot/Main.hs

(limited to 'Hsbot/Main.hs')

diff --git a/Hsbot/Main.hs b/Hsbot/Main.hs
new file mode 100644
index 0000000..129d2bd
--- /dev/null
+++ b/Hsbot/Main.hs
@@ -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
+
-- 
cgit v1.2.3