From 05726e8f6c34c10ca7cee54bb583fbbe2c877569 Mon Sep 17 00:00:00 2001
From: Gregor Kleen <pngwjpgh@users.noreply.github.com>
Date: Wed, 10 Aug 2016 17:24:17 +0200
Subject: Switch to megaparsec & parsing framework

---
 events/src/Events/Spec/Parse/AST.hs | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 events/src/Events/Spec/Parse/AST.hs

(limited to 'events/src/Events/Spec/Parse/AST.hs')

diff --git a/events/src/Events/Spec/Parse/AST.hs b/events/src/Events/Spec/Parse/AST.hs
new file mode 100644
index 0000000..38c2c84
--- /dev/null
+++ b/events/src/Events/Spec/Parse/AST.hs
@@ -0,0 +1,19 @@
+{-# LANGUAGE GADTs, DataKinds, OverloadedStrings #-}
+
+module Events.Spec.Parse.AST
+  ( AST(..)
+  , pAST
+  ) where
+
+import Events.Spec.Types
+import Events.Spec.Parse.Token
+
+import Text.Megaparsec hiding (parse)
+  
+import Data.Typeable (Typeable)
+
+data AST = AST
+  deriving (Typeable)
+
+pAST :: ParsecT Dec [SpecToken] m AST
+pAST = mzero {- TODO -}
-- 
cgit v1.2.3