let link_flags_byte = link_flags (fun x -> x.archives_byte)