more

src/context/common.ml

@@ -407,7 +407,6 @@ type context = {
 	mutable net_std : string list;
 	net_path_map : (path,string list * string list * string) Hashtbl.t;
 	mutable c_args : string list;
-	mutable js_gen : (unit -> unit) option;
 	(* misc *)
 	mutable basic : basic_types;
 	memory_marker : float array;
@@ -830,7 +829,6 @@ let create compilation_step cs version args display_mode =
 		c_args = [];
 		neko_lib_paths = [];
 		include_files = [];
-		js_gen = None;
 		load_extern_type = [];
 		defines = {
 			defines_signature = None;

src/generators/genjs.ml

@@ -1705,10 +1705,6 @@ let alloc_ctx com es_version =
 	ctx
 
 let generate com =
-	(match com.js_gen with
-	| Some g -> g()
-	| None ->
-
 	let es_version = get_es_version com in
 
 	if es_version >= 6 then
@@ -2000,5 +1996,4 @@ let generate com =
 	| None -> try Sys.remove (com.file ^ ".map") with _ -> ());
 	flush ctx;
 	Option.may (fun chan -> close_out chan) ctx.chan
-	)