module Language.Cimple
    ( module X
    , AstActions
    , defaultActions
    ) where

import           Control.Monad.State.Strict  (State)
import           Data.Text                   (Text)

import           Language.Cimple.Annot       as X
import           Language.Cimple.Ast         as X
import           Language.Cimple.Lexer       as X
import           Language.Cimple.Parser      as X
import           Language.Cimple.Tokens      as X
import           Language.Cimple.TraverseAst as X

type AstActions a = X.IdentityActions (State a) Text

defaultActions :: AstActions state
defaultActions :: forall state. AstActions state
defaultActions = AstActions (State state) Text Text
forall (f :: * -> *) text. Applicative f => AstActions f text text
X.identityActions