let local_write () = match ocamlbuild_commands#get with [] -> (try Sys.remove local_rc_file with _ -> ()) | _ -> local_group#write local_rc_file