summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDebian OCaml Maintainers <debian-ocaml-maint@lists.debian.org>2023-08-17 07:27:42 +0200
committerStéphane Glondu <glondu@debian.org>2023-08-17 07:27:42 +0200
commit961de233b39e87d7380fa10cd202beb9171f32a9 (patch)
tree546aa64efe36a5d2b79a484c886b39a7115be690
parent3fec12c7ab8b775e38f2e960c854cf449a7f5d9a (diff)
compile with a newer ppxlib
Forwarded: upstream 77e1be9f4ec630908a339fd614e416d0dbd77cf5 Gbp-Pq: Name fix_newer_ppxlib.patch
-rw-r--r--src/ppx/ppx_obus.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ppx/ppx_obus.ml b/src/ppx/ppx_obus.ml
index e07c3e3..8e08744 100644
--- a/src/ppx/ppx_obus.ml
+++ b/src/ppx/ppx_obus.ml
@@ -42,7 +42,7 @@ let register_obus_exception = function
in ()
] in
(match exn.ptyexn_constructor.pext_kind with
- | Pext_decl (Pcstr_tuple [typ], None) ->
+ | Pext_decl (_, Pcstr_tuple [typ], None) ->
Some (registerer typ)
| _ ->
Location.raise_errorf ~loc:pstr_loc