external create_tag_2 : text_buffer -> string option -> string -> string -> text_tag = "ml_gtk_text_buffer_create_tag_2"