diff options
| author |  msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-11-10 11:15:41 +0000 |
|---|---|---|
| committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-11-10 11:15:41 +0000 |
| commit | fa914a0fab970de22aa1382cb7b44c6acc9b0814 (patch) | |
| tree | eec5a8cee5ae2abad91b787d4e5041c57e9b56ad /toplevel/record.mli | |
| parent | 51556c4088c51ab027382c773bcbac99a5394328 (diff) | |
Fix mixup between Record, Structure and Class by adding a new variant for
the three cases.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11572 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel/record.mli')
| -rw-r--r-- | toplevel/record.mli | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/record.mli b/toplevel/record.mli index 57d8cccc0..8a4ca735c 100644 --- a/toplevel/record.mli +++ b/toplevel/record.mli @@ -36,5 +36,5 @@ val declare_structure : bool (*coinductive?*)-> identifier -> identifier -> inductive val definition_structure : - bool (* structure or class *) * bool (*coinductive?*)*lident with_coercion * local_binder list * + record_kind * bool (*coinductive?*)*lident with_coercion * local_binder list * (local_decl_expr with_coercion with_notation) list * identifier * sorts option -> global_reference |