Nettoyage du .obj laisse par MSVC (PR#640)

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4041 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Xavier Leroy 2001-11-26 14:24:59 +00:00
parent 320487c59f
commit 05313c9c6a
1 changed files with 4 additions and 2 deletions

View File

@ -450,8 +450,10 @@ let build_custom_runtime prim_name exec_name =
(List.rev_map Ccomp.expand_libname !Clflags.ccobjs))
(Ccomp.expand_libname "-lcamlrun")
Config.bytecomp_c_libraries) in
(* C compiler doesn't clean up after itself *)
remove_file (Filename.chop_suffix prim_name ".c" ^ ".obj");
(* C compiler doesn't clean up after itself. Note that the .obj
file is created in the current working directory. *)
remove_file
(Filename.chop_suffix (Filename.basename prim_name) ".c" ^ ".obj");
retcode
| "MacOS" ->
let cppc = "mrc"