aboutsummaryrefslogtreecommitdiffhomepage
path: root/contrib/funind/tacinv.ml4
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/funind/tacinv.ml4')
-rw-r--r--contrib/funind/tacinv.ml42
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/funind/tacinv.ml4 b/contrib/funind/tacinv.ml4
index 155a264f7..162ea2ebf 100644
--- a/contrib/funind/tacinv.ml4
+++ b/contrib/funind/tacinv.ml4
@@ -710,7 +710,7 @@ let declareFunScheme f fname mutflist =
VERNAC COMMAND EXTEND FunctionalScheme
[ "Functional" "Scheme" ident(na) ":=" "Induction" "for"
- constr(c) "with" constr_list(l) ]
+ constr(c) "with" ne_constr_list(l) ]
-> [ declareFunScheme c na l ]
| [ "Functional" "Scheme" ident(na) ":=" "Induction" "for" constr(c) ]
-> [ declareFunScheme c na [] ]