equal
deleted
inserted
replaced
1 {-# LANGUAGE ScopedTypeVariables, OverloadedStrings #-} |
1 {-# LANGUAGE ScopedTypeVariables, OverloadedStrings #-} |
2 module NetRoutines where |
2 module NetRoutines where |
3 |
3 |
4 import Network.Socket |
4 import Network.Socket |
5 import Control.Concurrent.Chan |
5 import Control.Concurrent.Chan |
6 import qualified Control.Exception as Exception |
|
7 import Data.Time |
6 import Data.Time |
8 import Control.Monad |
7 import Control.Monad |
9 import Data.Unique |
8 import Data.Unique |
10 ----------------------------- |
9 ----------------------------- |
11 import CoreTypes |
10 import CoreTypes |