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