aboutsummaryrefslogtreecommitdiffstats
path: root/src/trace/smtForm.mli
diff options
context:
space:
mode:
authorvblot <24938579+vblot@users.noreply.github.com>2021-05-28 18:29:37 +0200
committerGitHub <noreply@github.com>2021-05-28 18:29:37 +0200
commite12110637730d067c216abcc86185b761189b342 (patch)
treec9ed415bbdadb2801e4917aae4a803035b13d4e8 /src/trace/smtForm.mli
parent52980aab9541a12619eb9191a94e9b2ba4684447 (diff)
downloadsmtcoq-e12110637730d067c216abcc86185b761189b342.tar.gz
smtcoq-e12110637730d067c216abcc86185b761189b342.zip
getting rid of native-coq (#95)
Diffstat (limited to 'src/trace/smtForm.mli')
-rw-r--r--src/trace/smtForm.mli10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/trace/smtForm.mli b/src/trace/smtForm.mli
index 06a867f..47b4123 100644
--- a/src/trace/smtForm.mli
+++ b/src/trace/smtForm.mli
@@ -77,7 +77,7 @@ module type FORM =
val get : ?declare:bool -> reify -> pform -> t
(** Given a coq term, build the corresponding formula *)
- val of_coq : (Structures.constr -> hatom) -> reify -> Structures.constr -> t
+ val of_coq : (CoqInterface.constr -> hatom) -> reify -> CoqInterface.constr -> t
val hash_hform : (hatom -> hatom) -> reify -> t -> t
@@ -90,20 +90,20 @@ module type FORM =
(** Producing Coq terms *)
- val to_coq : t -> Structures.constr
+ val to_coq : t -> CoqInterface.constr
val pform_tbl : reify -> pform array
val to_array : reify -> 'a -> (pform -> 'a) -> int * 'a array
- val interp_tbl : reify -> Structures.constr * Structures.constr
+ val interp_tbl : reify -> CoqInterface.constr * CoqInterface.constr
val nvars : reify -> int
(* Producing a Coq term corresponding to the interpretation
of a formula *)
(* [interp_atom] map [hatom] to coq term, it is better if it produce
shared terms. *)
val interp_to_coq :
- (hatom -> Structures.constr) -> (int, Structures.constr) Hashtbl.t ->
- t -> Structures.constr
+ (hatom -> CoqInterface.constr) -> (int, CoqInterface.constr) Hashtbl.t ->
+ t -> CoqInterface.constr
(* Unstratified terms *)
type atom_form_lit =