sig
  type t = {
    forbid_empty_lines : bool;
    only_header_comment : bool;
    sharp_comments : bool;
    semicolon_comments : bool;
    max_items_per_line : int option;
    sequence : [ `char_sequence of char list option | `int_sequence ];
  }
  val char_sequence_default : Biocaml_fasta.Tags.t
  val int_sequence_default : Biocaml_fasta.Tags.t
  val is_char_sequence : Biocaml_fasta.Tags.t -> bool
  val is_int_sequence : Biocaml_fasta.Tags.t -> bool
  val to_string : Biocaml_fasta.Tags.t -> string
  val of_string :
    string ->
    (Biocaml_fasta.Tags.t, [> `tags_of_string of exn ]) Core.Result.t
  val t_of_sexp : Sexplib.Sexp.t -> Biocaml_fasta.Tags.t
  val sexp_of_t : Biocaml_fasta.Tags.t -> Sexplib.Sexp.t
end