Biocaml 0.4-dev : Biocaml_sam.Flags.of_int

let of_int x =

  if (0 <= x) && (x <= 65535) then

   Ok x

  else

   error "flag out of range" x sexp_of_int