let ocamlc_c tags arg out = let tags = tags++"ocaml"++"byte" in Cmd (S [!Options.ocamlc; A"-c"; T(tags++"compile"); ocaml_ppflags tags; ocaml_include_flags arg; A"-o"; Px out; P arg])