From bf804f73ce3494be430054499c5ce18f232f68ca Mon Sep 17 00:00:00 2001
From: Joris
Date: Fri, 18 Mar 2016 09:50:39 +0100
Subject: Add optional imports

---
 Data/ConfigManager/Types/Internal.hs | 39 ++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)
 create mode 100644 Data/ConfigManager/Types/Internal.hs

(limited to 'Data/ConfigManager/Types')

diff --git a/Data/ConfigManager/Types/Internal.hs b/Data/ConfigManager/Types/Internal.hs
new file mode 100644
index 0000000..5b91802
--- /dev/null
+++ b/Data/ConfigManager/Types/Internal.hs
@@ -0,0 +1,39 @@
+module Data.ConfigManager.Types.Internal
+  ( Config(..)
+  , Expr(..)
+  , Name
+  , Value
+  , Requirement(..)
+  ) where
+
+import Data.Text (Text)
+
+import Data.HashMap.Strict
+
+-- | Configuration data
+
+data Config = Config
+  { hashMap :: HashMap Name Value
+  } deriving (Eq, Read, Show)
+
+-- | An expression is either a binding or an import
+
+data Expr =
+  Binding Name Value
+  | Import Requirement FilePath
+  deriving (Eq, Read, Show)
+
+-- | A name is a text
+
+type Name = Text
+
+-- | A value is a text
+
+type Value = Text
+
+-- | A requirement is either required or optional
+
+data Requirement =
+  Required
+  | Optional
+  deriving (Eq, Read, Show)
-- 
cgit v1.2.3