Revert "don't regenerate when the compilation was fully cached", see #8209

This reverts commit f0be760d8673a3bbb621bf6da956c0950c0a7b9a.

src/compiler/main.ml

@@ -954,11 +954,6 @@ try
 		Filters.run com tctx main;
 		t();
 		if ctx.has_error then raise Abort;
-		if not com.needs_generation then begin
-			xml_out := None;
-			json_out := None;
-			no_output := true;
-		end;
 		begin match !xml_out with
 			| None -> ()
 			| Some "hx" ->

src/compiler/server.ml

@@ -425,7 +425,6 @@ let rec wait_loop process_params verbose accept =
 		in
 		let create params =
 			let ctx = create_context params in
-			ctx.com.needs_generation <- false;
 			ctx.flush <- (fun() ->
 				incr compilation_step;
 				compilation_mark := !mark_loop;

src/context/common.ml

@@ -192,7 +192,6 @@ type context = {
 	mutable stored_typed_exprs : (int, texpr) PMap.t;
 	pass_debug_messages : string DynArray.t;
 	(* output *)
-	mutable needs_generation : bool;
 	mutable file : string;
 	mutable flash_version : float;
 	mutable features : (string,bool) Hashtbl.t;
@@ -412,7 +411,6 @@ let create version s_version args =
 			unresolved_identifiers = [];
 			interface_field_implementations = [];
 		};
-		needs_generation = true;
 		sys_args = args;
 		debug = false;
 		display = DisplayTypes.DisplayMode.create !Parser.display_mode;

src/typing/typeloadParse.ml

@@ -30,7 +30,6 @@ open Error
 let parse_file_from_lexbuf com file p lexbuf =
 	let t = Timer.timer ["parsing"] in
 	Lexer.init file true;
-	com.needs_generation <- true;
 	incr stats.s_files_parsed;
 	let parse_result = try
 		ParserEntry.parse com.defines lexbuf file