ligo/src/passes/1-parser/pascaligo/ParserMain.ml

(** Driver for the PascaLIGO parser *)

module IO =
  struct
    let ext = ".ligo"
    let options = EvalOpt.read "PascaLIGO" ext
  end

module ExtParser =
  struct
    type ast = AST.t
    type expr = AST.expr
    include Parser
  end

module ExtParserLog =
  struct
    type ast = AST.t
    include ParserLog
  end

module M = ParserUnit.Make (IO)
                           (Lexer.Make (LexToken))
                           (AST)
                           (ExtParser)
                           (ParErr)
                           (ExtParserLog)