Printer

`sig
val day_name : (Date.day -> string) Pervasives.ref
val name_of_day : Date.day -> string
val short_name_of_day : Date.day -> string
val month_name : (Date.month -> string) Pervasives.ref
val name_of_month : Date.month -> string
val short_name_of_month : Date.month -> string
val set_word_regexp : Str.regexp -> unit
module type S =
sig
type t
val fprint : string -> Format.formatter -> Printer.S.t -> unit
val print : string -> Printer.S.t -> unit
val dprint : Printer.S.t -> unit
val sprint : string -> Printer.S.t -> string
val to_string : Printer.S.t -> string
val from_fstring : string -> string -> Printer.S.t
val from_string : string -> Printer.S.t
end
module Date :
sig
type t = Date.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
module DatePrinter :
sig
type t = Date.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
module Time :
sig
type t = Time.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
module TimePrinter :
sig
type t = Time.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
module Ftime :
sig
type t = Ftime.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
module Precise_Calendar :
sig
type t = Calendar.Precise.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
module Calendar :
sig
type t = Calendar.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
module CalendarPrinter :
sig
type t = Calendar.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
module Precise_Fcalendar :
sig
type t = Fcalendar.Precise.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
module Fcalendar :
sig
type t = Fcalendar.t
val fprint : string -> Format.formatter -> t -> unit
val print : string -> t -> unit
val dprint : t -> unit
val sprint : string -> t -> string
val to_string : t -> string
val from_fstring : string -> string -> t
val from_string : string -> t
end
end`