aboutsummaryrefslogtreecommitdiff
path: root/plugins/micromega/zify.ml
diff options
context:
space:
mode:
authorThéo Zimmermann2020-03-26 11:25:10 +0100
committerThéo Zimmermann2020-03-26 11:25:10 +0100
commitb398a4eb55c42a97d7d177839d5033a306ee7d52 (patch)
tree707105889c62bdba854398e10c32df9ffdb470e0 /plugins/micromega/zify.ml
parent63f2da5b3703a16c7722b91ce2f2c78617dec9a7 (diff)
parent7e6b2c6311933f8ef947935f5d4b5897816ab3e4 (diff)
Merge PR #11832: [ocamlformat] Use doc-comments=before style.
Reviewed-by: Zimmi48
Diffstat (limited to 'plugins/micromega/zify.ml')
-rw-r--r--plugins/micromega/zify.ml6
1 files changed, 3 insertions, 3 deletions
diff --git a/plugins/micromega/zify.ml b/plugins/micromega/zify.ml
index 53a58342d2..41579d5792 100644
--- a/plugins/micromega/zify.ml
+++ b/plugins/micromega/zify.ml
@@ -326,20 +326,20 @@ type term_kind = Application of EConstr.constr | OtherTerm of EConstr.constr
module type Elt = sig
type elt
- val name : string
(** name *)
+ val name : string
val table : (term_kind * decl_kind) HConstr.t ref
val cast : elt decl -> decl_kind
val dest : decl_kind -> elt decl option
- val get_key : int
(** [get_key] is the type-index used as key for the instance *)
+ val get_key : int
- val mk_elt : Evd.evar_map -> EConstr.t -> EConstr.t array -> elt
(** [mk_elt evd i [a0,..,an] returns the element of the table
built from the type-instance i and the arguments (type indexes and projections)
of the type-class constructor. *)
+ val mk_elt : Evd.evar_map -> EConstr.t -> EConstr.t array -> elt
(* val arity : int*)
end