diff options
| author |  Daniel de Rauglaudre <daniel.de_rauglaudre@inria.fr> | 2016-02-15 16:22:45 +0100 |
|---|---|---|
| committer |  Maxime Dénès <mail@maximedenes.fr> | 2016-06-27 12:31:23 +0200 |
| commit | c6d9d4fb142ef42634be25b60c0995b541e86629 (patch) | |
| tree | e6cd36fc03ae7a79d9b65f08b0295bedc485f855 /toplevel/command.ml | |
| parent | 4d4e2f421c1a4f0339568d3c96ff2459a027aa09 (diff) | |
Adding ability to put any pattern in binders, prefixed by a quote.
Cf CHANGES for details.
Diffstat (limited to 'toplevel/command.ml')
| -rw-r--r-- | toplevel/command.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/toplevel/command.ml b/toplevel/command.ml index 5041d78a3..1fda5b9f7 100644 --- a/toplevel/command.ml +++ b/toplevel/command.ml @@ -548,6 +548,7 @@ let check_param = function | LocalRawDef (na, _) -> check_named na | LocalRawAssum (nas, Default _, _) -> List.iter check_named nas | LocalRawAssum (nas, Generalized _, _) -> () +| LocalPattern _ -> assert false let interp_mutual_inductive (paramsl,indl) notations poly prv finite = check_all_names_different indl; |