equal
deleted
inserted
replaced
3 module Main where |
3 module Main where |
4 |
4 |
5 import Network |
5 import Network |
6 import Control.Concurrent.STM |
6 import Control.Concurrent.STM |
7 import Control.Concurrent.Chan |
7 import Control.Concurrent.Chan |
8 #if defined(NEW_EXCEPTIONS) |
|
9 import qualified Control.OldException as Exception |
|
10 #else |
|
11 import qualified Control.Exception as Exception |
8 import qualified Control.Exception as Exception |
12 #endif |
|
13 import System.Log.Logger |
9 import System.Log.Logger |
14 ----------------------------------- |
10 ----------------------------------- |
15 import Opts |
11 import Opts |
16 import CoreTypes |
12 import CoreTypes |
17 import ServerCore |
13 import ServerCore |