module Config
    ( Config(..)
    , readFile
    )
  where

import Prelude hiding (readFile)
import qualified Prelude (readFile)

import Network.Socket

data Config = Config
    { bufSize :: Int
    , port :: ServiceName
    }
  deriving (Read,Show)

readFile :: FilePath -> IO Config
readFile path =
  read <$> Prelude.readFile path