diff options
Diffstat (limited to 'contrib/extraction/extraction.mli')
| -rw-r--r-- | contrib/extraction/extraction.mli | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/contrib/extraction/extraction.mli b/contrib/extraction/extraction.mli index df5a414a1f..b54a7b9abb 100644 --- a/contrib/extraction/extraction.mli +++ b/contrib/extraction/extraction.mli @@ -19,6 +19,8 @@ type type_var = Varity | Vprop | Vdefault type signature = (type_var * identifier) list +type extraction_context = type_var list + type extraction_result = | Emltype of ml_type * signature * identifier list | Emlterm of ml_ast @@ -26,7 +28,8 @@ type extraction_result = (*s Extraction functions. *) -val extract_constr : env -> constr -> extraction_result +val extract_constr : + env -> extraction_context -> constr -> extraction_result (*s ML declaration corresponding to a Coq reference. *) |