sig
  val string_of_list : string list -> string
  val split_plural : string -> string list
  val fail_or_continue : GettextTypes.failsafe -> exn -> '-> 'a
end