diff options
| author | Pierre-Marie Pédrot | 2021-01-19 10:02:32 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2021-01-19 10:02:32 +0100 |
| commit | 326df6dc176f70b3192f463164c3a435ab187bed (patch) | |
| tree | 8721d463b0f41e5134e823c756b72a936c4df607 /theories/Program | |
| parent | f44e65e0d209fdada20998d661ad10a5e82a0d92 (diff) | |
| parent | 4419a101a4f5a108be90cf4e420f0b6961e6caac (diff) | |
Merge PR #13725: Support locality attributes for Hint Rewrite (including export)
Ack-by: Zimmi48
Ack-by: gares
Reviewed-by: ppedrot
Diffstat (limited to 'theories/Program')
| -rw-r--r-- | theories/Program/Combinators.v | 4 | ||||
| -rw-r--r-- | theories/Program/Equality.v | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/theories/Program/Combinators.v b/theories/Program/Combinators.v index 8813131d7b..18e55aefc6 100644 --- a/theories/Program/Combinators.v +++ b/theories/Program/Combinators.v @@ -40,8 +40,8 @@ Proof. reflexivity. Qed. -Hint Rewrite @compose_id_left @compose_id_right : core. -Hint Rewrite <- @compose_assoc : core. +Global Hint Rewrite @compose_id_left @compose_id_right : core. +Global Hint Rewrite <- @compose_assoc : core. (** [flip] is involutive. *) diff --git a/theories/Program/Equality.v b/theories/Program/Equality.v index 25af2d5ffb..090322054e 100644 --- a/theories/Program/Equality.v +++ b/theories/Program/Equality.v @@ -162,7 +162,7 @@ Ltac pi_eq_proofs := repeat pi_eq_proof. Ltac clear_eq_proofs := abstract_eq_proofs ; pi_eq_proofs. -Hint Rewrite <- eq_rect_eq : refl_id. +Global Hint Rewrite <- eq_rect_eq : refl_id. (** The [refl_id] database should be populated with lemmas of the form [coerce_* t eq_refl = t]. *) @@ -178,7 +178,7 @@ Lemma inj_pairT2_refl A (x : A) (P : A -> Type) (p : P x) : Eqdep.EqdepTheory.inj_pairT2 A P x p p eq_refl = eq_refl. Proof. apply UIP_refl. Qed. -Hint Rewrite @JMeq_eq_refl @UIP_refl_refl @inj_pairT2_refl : refl_id. +Global Hint Rewrite @JMeq_eq_refl @UIP_refl_refl @inj_pairT2_refl : refl_id. Ltac rewrite_refl_id := autorewrite with refl_id. |