initial commitHEADv1.0.0ni/mastermaster

1 files changed, 20 insertions, 0 deletions

diff --git a/Config.hs b/Config.hs
new file mode 100644
index 0000000..1fb02a6
--- /dev/null
+++ b/Config.hs
@@ -0,0 +1,20 @@
+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