Fix w.r.t. coq/coq#9051.

1 files changed, 2 insertions, 2 deletions

diff --git a/src/g_ltac2.mlg b/src/g_ltac2.mlg
index 2a20264edc..12364a0bd8 100644
--- a/src/g_ltac2.mlg
+++ b/src/g_ltac2.mlg
@@ -25,7 +25,7 @@ type lookahead = int -> Tok.t Stream.t -> int option
 
 let entry_of_lookahead s (lk : lookahead) =
   let run strm = match lk 0 strm with None -> err () | Some _ -> () in
-  Gram.Entry.of_parser s run
+  Pcoq.Entry.of_parser s run
 
 let (>>) (lk1 : lookahead) lk2 n strm = match lk1 n strm with
 | None -> None
@@ -859,7 +859,7 @@ let rules = [
 ] in
 
 Hook.set Tac2entries.register_constr_quotations begin fun () ->
-  Gram.gram_extend Pcoq.Constr.operconstr (Some (Level "0"), [(None, None, rules)])
+  Pcoq.grammar_extend Pcoq.Constr.operconstr None (Some (Level "0"), [(None, None, rules)])
 end
 
 }