let verbose = ref ""
let jobs = ref 0
let specs = align
- [ "-verbose", Unit (set verbose "-verbose 10 -classic-display"),
+ [ "-verbose", Unit (set verbose " -classic-display"),
" Display compilation commands";
"-debug", Unit (cons tags "-tag debug"),
let () = Cmdline.parse ()
let cmd_list =
let ocamlbuild =
- Printf.sprintf "ocamlbuild -byte-plugin %s %s -j %i "
+ Printf.sprintf "ocamlbuild %s %s -j %i "
!Cmdline.verbose (String.concat " " !Cmdline.tags) !Cmdline.jobs
in
List.map begin function