diff options
author | 2018-03-06 10:07:35 +0100 | |
---|---|---|
committer | 2018-03-06 10:07:35 +0100 | |
commit | ddc9728030a98b03447e321d2eb4af0d92add11f (patch) | |
tree | 6892bdb6f90ff1978824b1d2bc07f534d14d9167 /plugins/ssr/ssrparser.mli | |
parent | 273089065edaf5d926ad820d3bc3c0dacec1b75d (diff) | |
parent | 0b1032f2acdb6f7d92c84ba3afcbf3818cc107a9 (diff) |
Merge PR #6795: [ssreflect] Export parsing witnesses in mli file.
Diffstat (limited to 'plugins/ssr/ssrparser.mli')
-rw-r--r-- | plugins/ssr/ssrparser.mli | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/plugins/ssr/ssrparser.mli b/plugins/ssr/ssrparser.mli index a52248614..130550388 100644 --- a/plugins/ssr/ssrparser.mli +++ b/plugins/ssr/ssrparser.mli @@ -20,3 +20,16 @@ val pr_ssrtclarg : 'a -> 'b -> (Notation_term.tolerability -> 'c -> 'd) -> 'c -> val add_genarg : string -> ('a -> Pp.t) -> 'a Genarg.uniform_genarg_type +(* Parsing witnesses, needed to serialize ssreflect syntax *) +open Ssrmatching_plugin +open Ssrmatching +open Ssrast +open Ssrequality + +val wit_ssrrwargs : ssrrwarg list Genarg.uniform_genarg_type +val wit_ssrclauses : clauses Genarg.uniform_genarg_type +val wit_ssrcasearg : (cpattern ssragens) ssrmovearg Genarg.uniform_genarg_type +val wit_ssrmovearg : (cpattern ssragens) ssrmovearg Genarg.uniform_genarg_type +val wit_ssrapplyarg : ssrapplyarg Genarg.uniform_genarg_type +val wit_ssrhavefwdwbinders : + (Tacexpr.raw_tactic_expr fwdbinders, Tacexpr.glob_tactic_expr fwdbinders, Tacinterp.Value.t fwdbinders) Genarg.genarg_type |