diff options
author | Gregor Kleen <pngwjpgh@users.noreply.github.com> | 2016-08-10 17:24:17 +0200 |
---|---|---|
committer | Gregor Kleen <pngwjpgh@users.noreply.github.com> | 2016-08-10 17:24:17 +0200 |
commit | 05726e8f6c34c10ca7cee54bb583fbbe2c877569 (patch) | |
tree | dffc4d3145a4706335ace2a204ef8776f526e26e /events/src/Events/Spec/Parse/AST.hs | |
parent | 744083442a869d45968611b333533473fd832507 (diff) | |
download | events-05726e8f6c34c10ca7cee54bb583fbbe2c877569.tar events-05726e8f6c34c10ca7cee54bb583fbbe2c877569.tar.gz events-05726e8f6c34c10ca7cee54bb583fbbe2c877569.tar.bz2 events-05726e8f6c34c10ca7cee54bb583fbbe2c877569.tar.xz events-05726e8f6c34c10ca7cee54bb583fbbe2c877569.zip |
Switch to megaparsec & parsing framework
Diffstat (limited to 'events/src/Events/Spec/Parse/AST.hs')
-rw-r--r-- | events/src/Events/Spec/Parse/AST.hs | 19 |
1 files changed, 19 insertions, 0 deletions
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 @@ | |||
1 | {-# LANGUAGE GADTs, DataKinds, OverloadedStrings #-} | ||
2 | |||
3 | module Events.Spec.Parse.AST | ||
4 | ( AST(..) | ||
5 | , pAST | ||
6 | ) where | ||
7 | |||
8 | import Events.Spec.Types | ||
9 | import Events.Spec.Parse.Token | ||
10 | |||
11 | import Text.Megaparsec hiding (parse) | ||
12 | |||
13 | import Data.Typeable (Typeable) | ||
14 | |||
15 | data AST = AST | ||
16 | deriving (Typeable) | ||
17 | |||
18 | pAST :: ParsecT Dec [SpecToken] m AST | ||
19 | pAST = mzero {- TODO -} | ||