diff options
Diffstat (limited to 'ide')
| -rw-r--r-- | ide/coq.ml | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/ide/coq.ml b/ide/coq.ml index 0a72c97bc4..eeb31e1ae2 100644 --- a/ide/coq.ml +++ b/ide/coq.ml @@ -432,10 +432,8 @@ let make_cases s = let glob_ref = Nametab.locate qualified_name in match glob_ref with | Libnames.IndRef i -> - let _, - { - Declarations.mind_nparams = np ; - Declarations.mind_consnames = carr ; + let {Declarations.mind_nparams = np}, + {Declarations.mind_consnames = carr ; Declarations.mind_nf_lc = tarr } = Global.lookup_inductive i in |