summaryrefslogtreecommitdiff
path: root/events/src/Events/Spec/Parse/AST.hs
blob: 38c2c84ff870fa5abffbf528f03157bd6731fb1d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
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 -}