Adapt to coq/coq#19310

proux01 · Jul 28, 2024 · bfbd4ee · bfbd4ee
1 parent a130580
commit bfbd4ee
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/TacticsUtil.v.cppo b/src/TacticsUtil.v.cppo
@@ -13,7 +13,11 @@ From Ltac2 Require Import Ltac2.
 From Ltac2 Require Import Message.
 From Ltac2 Require Import Constr.
 
+#if COQ_VERSION >= (8, 21, 0)
+Ltac2 ltac1_congruence () := Ltac1.run (Ltac1.ref [ident:(Stdlib); ident:(Init); ident:(Prelude); ident:(congruence)]).
+#else
 Ltac2 ltac1_congruence () := Ltac1.run (Ltac1.ref [ident:(Coq); ident:(Init); ident:(Prelude); ident:(congruence)]).
+#endif
 Ltac2 Notation "congruence" := ltac1_congruence ().
 
 (* From https://github.com/tchajed/coq-ltac2-experiments/blob/master/src/Ltac2Lib.v *)