aboutsummaryrefslogtreecommitdiff
path: root/lib/genarg.mli
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2015-12-17 19:24:17 +0100
committerPierre-Marie Pédrot2015-12-21 19:36:38 +0100
commitb2beb9087628de23679a831e6273b91816f1ed27 (patch)
tree40784a3be039885aef29c3c23fda2a0189fe2ac1 /lib/genarg.mli
parentfcf425a4714f0c888b3d670a9a37fe52a6e49bc5 (diff)
Using dynamic values in tactic evaluation.
Diffstat (limited to 'lib/genarg.mli')
-rw-r--r--lib/genarg.mli5
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/genarg.mli b/lib/genarg.mli
index d52a246107..c431aa619d 100644
--- a/lib/genarg.mli
+++ b/lib/genarg.mli
@@ -191,6 +191,8 @@ val val_tag : 'a typed_abstract_argument_type -> 'a Val.tag
(** Retrieve the dynamic type associated to a toplevel genarg. Only works for
ground generic arguments. *)
+val val_cast : 'a typed_abstract_argument_type -> Val.t -> 'a
+
val option_val : Val.t option Val.tag
val list_val : Val.t list Val.tag
val pair_val : (Val.t * Val.t) Val.tag
@@ -212,6 +214,9 @@ type argument_type =
| PairArgType of argument_type * argument_type
| ExtraArgType of string
+exception CastError of argument_type * Val.t
+(** Exception raised by {!val_cast} *)
+
val argument_type_eq : argument_type -> argument_type -> bool
val pr_argument_type : argument_type -> Pp.std_ppcmds