diff options
| author | herbelin | 2006-07-03 16:40:20 +0000 |
|---|---|---|
| committer | herbelin | 2006-07-03 16:40:20 +0000 |
| commit | 1e69c6a499757b05180205e84ed2bf6f1cbf7b2f (patch) | |
| tree | 0b6c57991e1bd849593f846ae8b91ce18d9f9194 /interp/topconstr.ml | |
| parent | b7c3f0f2f57bcd0cc768c869d707b70f78c5bbfd (diff) | |
Extension des motifs disjonctifs au cas de disjonction de motifs multiples
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@8997 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'interp/topconstr.ml')
| -rw-r--r-- | interp/topconstr.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/topconstr.ml b/interp/topconstr.ml index 6e7ea0f9c8..855fcb329f 100644 --- a/interp/topconstr.ml +++ b/interp/topconstr.ml @@ -515,7 +515,7 @@ type constr_expr = (constr_expr * explicitation located option) list | CCases of loc * constr_expr option * (constr_expr * (name option * constr_expr option)) list * - (loc * cases_pattern_expr list * constr_expr) list + (loc * cases_pattern_expr list list * constr_expr) list | CLetTuple of loc * name list * (name option * constr_expr option) * constr_expr * constr_expr | CIf of loc * constr_expr * (name option * constr_expr option) |