Explorar o código

make sure to remove .map file if we are not compiling with -debug

Nicolas Cannasse %!s(int64=13) %!d(string=hai) anos
pai
achega
6186f15eda
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      genjs.ml

+ 1 - 1
genjs.ml

@@ -1195,7 +1195,7 @@ let generate com =
 		print ctx "})()";
 		newline ctx;
 	end;
-	if com.debug then write_mappings ctx;
+	if com.debug then write_mappings ctx else try Sys.remove (com.file ^ ".map") with _ -> ();
 	let ch = open_out_bin com.file in
 	output_string ch (Buffer.contents ctx.buf);
 	close_out ch);