diff options
Diffstat (limited to 'pretyping')
| -rw-r--r-- | pretyping/classops.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/pretyping/classops.mli b/pretyping/classops.mli index fbc6c39fbd..053e93cd43 100644 --- a/pretyping/classops.mli +++ b/pretyping/classops.mli @@ -55,7 +55,10 @@ val coercion_info_from_index : int -> coe_typ * coe_info_typ val coercion_params : reference -> int (* raise [Not_found] if not a coercion *) val constructor_at_head : constr -> cl_typ * int + +(* raises [Not_found] if not convertible to a class *) val class_of : env -> 'c evar_map -> constr -> constr * int + val class_args_of : constr -> constr list val inClass : (cl_typ * cl_info_typ) -> obj val outClass : obj -> (cl_typ * cl_info_typ) |