diff options
| author | Arnaud Spiwack | 2014-09-02 18:02:26 +0200 |
|---|---|---|
| committer | Arnaud Spiwack | 2014-09-04 10:25:54 +0200 |
| commit | ac2fdfb222083faa9c3893194e020bed38555ddb (patch) | |
| tree | df170292bb8d960469a3653d8f7481b42599fbf9 /tools/coqdoc | |
| parent | c907f31fd8f4b12bf2d7df2078603dbe804475a2 (diff) | |
Add a [Variant] declaration which allows to write non-recursive variant types.
Just like the [Record] keyword allows only non-recursive records.
Diffstat (limited to 'tools/coqdoc')
| -rw-r--r-- | tools/coqdoc/cpretty.mll | 1 | ||||
| -rw-r--r-- | tools/coqdoc/output.ml | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/tools/coqdoc/cpretty.mll b/tools/coqdoc/cpretty.mll index 73c313252f..d6eb68882a 100644 --- a/tools/coqdoc/cpretty.mll +++ b/tools/coqdoc/cpretty.mll @@ -313,6 +313,7 @@ let def_token = | "Boxed" | "CoFixpoint" | "Record" + | "Variant" | "Structure" | "Scheme" | "Inductive" diff --git a/tools/coqdoc/output.ml b/tools/coqdoc/output.ml index 28480d4bd4..0561d9a081 100644 --- a/tools/coqdoc/output.ml +++ b/tools/coqdoc/output.ml @@ -50,6 +50,7 @@ let is_keyword = "subgoal"; "subgoals"; "vm_compute"; "Opaque"; "Transparent"; "Time"; "Extraction"; "Extract"; + "Variant"; (* Program *) "Program Definition"; "Program Example"; "Program Fixpoint"; "Program Lemma"; "Obligation"; "Obligations"; "Solve"; "using"; "Next Obligation"; "Next"; |