Skip to content

Commit 74f0d5b

Browse files
gaschewhitequark
authored andcommitted
fix compatibility with 4.02 and 4.03
1 parent d9dfb2b commit 74f0d5b

File tree

1 file changed

+8
-1
lines changed

1 file changed

+8
-1
lines changed

src/ppx_import.cppo.ml

+8-1
Original file line numberDiff line numberDiff line change
@@ -98,7 +98,14 @@ let rec try_open_module_type env module_type =
9898
match module_type with
9999
| Mty_signature sig_items -> Some sig_items
100100
| Mty_functor _ -> None
101-
| (Mty_ident path | Mty_alias (_, path)) ->
101+
| (Mty_ident path
102+
| Mty_alias
103+
#if OCAML_VERSION <= (4, 03, 0)
104+
path
105+
#else
106+
(_, path)
107+
#endif
108+
) ->
102109
begin match
103110
(try Some (Env.find_module path env) with Not_found -> None)
104111
with

0 commit comments

Comments
 (0)