Support for simple include.

LexiFi · Oct 13, 2024 · 64ab081 · 64ab081
1 parent 2ee2228
commit 64ab081
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/ppx-lib/gen_js_api_ppx.ml b/ppx-lib/gen_js_api_ppx.ml
@@ -675,6 +675,7 @@ let rec parse_sig_item ~global_attrs rest s =
   | Psig_include ({pincl_mod; _} as info) ->
       let rec module_expr mod_typ =
         match mod_typ.pmty_desc with
+        | Pmty_ident lid -> Mod.ident lid
         | Pmty_typeof module_expr -> module_expr
         | Pmty_with (t, _) -> module_expr t
         | _ -> error s.psig_loc Cannot_parse_sigitem