Biocaml 0.4-dev : Biocaml_sam.print_rnext

let print_rnext = function

 | None -> "*"

 | Some `Equal_to_RNAME -> "="

 | Some (`Value x) -> x