module Minilang.Lambda.Parser where import Data.Text (Text) data ParseError = ParseError deriving (Eq, Show) data AST = Sym Text deriving (Eq, Show) parse :: Text -> Either ParseError AST parse = undefined