let byte_debug_link = byte_debug_link_gen ocamlc_link_prog (fun tags -> tags++"ocaml"++"link"++"byte"++"debug"++"program")