Przeglądaj źródła

generate extern modules too

Simon Krajewski 1 rok temu
rodzic
commit
44c248ca1f
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      src/compiler/generate.ml

+ 1 - 1
src/compiler/generate.ml

@@ -24,7 +24,7 @@ let check_auxiliary_output com actx =
 let export_hxb com cc platform zip m =
 let export_hxb com cc platform zip m =
 	let open HxbData in
 	let open HxbData in
 	match m.m_extra.m_kind with
 	match m.m_extra.m_kind with
-		| MCode | MMacro | MFake -> begin
+		| MCode | MMacro | MFake | MExtern -> begin
 			(* Printf.eprintf "Export module %s\n" (s_type_path m.m_path); *)
 			(* Printf.eprintf "Export module %s\n" (s_type_path m.m_path); *)
 			let l = platform :: (fst m.m_path @ [snd m.m_path]) in
 			let l = platform :: (fst m.m_path @ [snd m.m_path]) in
 			let path = (String.concat "/" l) ^ ".hxb" in
 			let path = (String.concat "/" l) ^ ".hxb" in