sig
  val string_of_exception : exn -> string
  val init : GettextTypes.dependencies
  module Library :
    functor (Init : GettextTypes.INIT_TYPE->
      sig
        val init : GettextTypes.dependencies
        val s_ : string -> string
        val f_ : string -> ('a, 'b, 'c, 'd) format4
        val sn_ : string -> string -> int -> string
        val fn_ : string -> string -> int -> ('a, 'b, 'c, 'd) format4
      end
  module Program :
    functor (Init : GettextTypes.INIT_TYPE->
      functor (Realize : GettextTypes.REALIZE_TYPE->
        sig
          val init : (Arg.key * Arg.spec * Arg.doc) list * string
          val s_ : string -> string
          val f_ : string -> ('a, 'b, 'c, 'd) format4
          val sn_ : string -> string -> int -> string
          val fn_ : string -> string -> int -> ('a, 'b, 'c, 'd) format4
        end
end