mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-12 14:00:42 -05:00
24 lines
446 B
OCaml
24 lines
446 B
OCaml
|
|
(* This file is free software. See file "license" for more details. *)
|
|
|
|
(** {1 Preprocessing AST} *)
|
|
|
|
module Loc = Locations
|
|
|
|
type 'a or_error = ('a, string) CCResult.t
|
|
|
|
(** {2 Parsing and Typing} *)
|
|
|
|
module Ctx : sig
|
|
type t
|
|
val create: unit -> t
|
|
val pp : t CCFormat.printer
|
|
end
|
|
|
|
module PA = Parse_ast
|
|
module A = Sidekick_smt.Ast
|
|
|
|
val conv_term : Ctx.t -> PA.term -> A.term
|
|
|
|
val conv_statement : Ctx.t -> PA.statement -> A.statement list
|
|
|