Biocaml 0.4-dev : Biocaml_sam.parse_rnext

let parse_rnext s =
if not (Re.execp rnext_re s) then
error "invalid RNEXT" s sexp_of_string
else
match s with
| "*" -> Ok None
| "=" -> Ok (Some `Equal_to_RNAME)
| _ -> Ok (Some (`Value s))

AltStyle によって変換されたページ (->オリジナル) /