1 files changed, 23 insertions, 1 deletions

diff --git a/events/src/Main.hs b/events/src/Main.hs
index 1c56140..7f65b19 100644
--- a/events/src/Main.hs
+++ b/events/src/Main.hs
@@ -1,4 +1,26 @@
+{-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE OverloadedLists #-}
+
 import Events.Types
+import Events.Spec
+
+import qualified Data.Yaml as Yaml
+import qualified Data.ByteString.Char8 as CBS
+
+import Control.Lens
+import Control.Monad
+import Control.Monad.Trans
+import Data.Aeson.Lens
+import Data.Aeson
+
+import Debug.Trace
+
+import qualified ListT
 
 main :: IO ()
-main = undefined
+main = test $ [ -- Nop
+              -- , Override [("blub", String "Haha!")]
+              --,  Occurs (BoolLit True)
+              ]
+  where
+    test = CBS.putStr . Yaml.encode <=< evaluate . interpret