diff options
Diffstat (limited to 'test-suite/failure/Case9.v')
-rw-r--r-- | test-suite/failure/Case9.v | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/test-suite/failure/Case9.v b/test-suite/failure/Case9.v index d63c49403..ec4852300 100644 --- a/test-suite/failure/Case9.v +++ b/test-suite/failure/Case9.v @@ -2,7 +2,9 @@ Parameter compare : forall n m : nat, {n < m} + {n = m} + {n > m}. Type match compare 0 0 return nat with - (* k<i *) | left _ _ (left _ _ _) => 0 - (* k=i *) | left _ _ _ => 0 - (* k>i *) | right _ _ _ => 0 + (* k<i *) | left _ (left _ _) => 0 + (* k=i *) | left _ _ => 0 + (* k>i *) | right _ _ => 0 + end. + end. |