diff options
| author | Hugo Herbelin | 2020-01-19 19:11:58 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2020-01-19 19:11:58 +0100 |
| commit | 2ae084f55c2e9bce3023a25a1e2c7a70dadcf348 (patch) | |
| tree | 9a3b7a26e79d80764533ce9618d03a0eb35347f5 /test-suite/success | |
| parent | c4de7eb4a4e470864ecd06bb240a3f572d7d84d7 (diff) | |
| parent | b9f3e03dd07e678ce900f332cf4653c5d222ee16 (diff) | |
Merge PR #11368: Turn trailing implicit warning into an error
Ack-by: Zimmi48
Reviewed-by: herbelin
Ack-by: maximedenes
Diffstat (limited to 'test-suite/success')
| -rw-r--r-- | test-suite/success/Inductive.v | 2 | ||||
| -rw-r--r-- | test-suite/success/Inversion.v | 2 | ||||
| -rw-r--r-- | test-suite/success/RecTutorial.v | 4 |
3 files changed, 4 insertions, 4 deletions
diff --git a/test-suite/success/Inductive.v b/test-suite/success/Inductive.v index d17b266690..4b2d4457bf 100644 --- a/test-suite/success/Inductive.v +++ b/test-suite/success/Inductive.v @@ -71,7 +71,7 @@ CoInductive LList (A : Set) : Set := | LNil : LList A | LCons : A -> LList A -> LList A. -Arguments LNil [A]. +Arguments LNil {A}. Inductive Finite (A : Set) : LList A -> Prop := | Finite_LNil : Finite LNil diff --git a/test-suite/success/Inversion.v b/test-suite/success/Inversion.v index 1dbeaf3e1f..8297f54641 100644 --- a/test-suite/success/Inversion.v +++ b/test-suite/success/Inversion.v @@ -31,7 +31,7 @@ Inductive in_extension (I : Set) (r : rule I) : extension I -> Type := | in_first : forall e, in_extension r (add_rule r e) | in_rest : forall e r', in_extension r e -> in_extension r (add_rule r' e). -Arguments NL [I]. +Arguments NL {I}. Inductive super_extension (I : Set) (e : extension I) : extension I -> Type := diff --git a/test-suite/success/RecTutorial.v b/test-suite/success/RecTutorial.v index 4fac798f76..15672eab7c 100644 --- a/test-suite/success/RecTutorial.v +++ b/test-suite/success/RecTutorial.v @@ -994,7 +994,7 @@ Qed. Arguments Vector.cons [A] _ [n]. -Arguments Vector.nil [A]. +Arguments Vector.nil {A}. Arguments Vector.hd [A n]. Arguments Vector.tl [A n]. @@ -1161,7 +1161,7 @@ infiniteproof map_iterate'. Qed. -Arguments LNil [A]. +Arguments LNil {A}. Lemma Lnil_not_Lcons : forall (A:Set)(a:A)(l:LList A), LNil <> (LCons a l). |
