package email_message
Module Email_headers.ValueSource
Normalize the whitespace for processing/ if normalize == `None this does nothing. if normalize == `Whitespace (default), strip leading/trailing whitespace on every line.
Normalize the whitespace for transport (insert the appropriate leading space). if normalize == `None this does nothing. if normalize == `Whitespace (default), insert a leading space and indent subsequent lines with a tab (remove any other leading/trailing space on every line).
include Core.Comparable.S_plain with type t := t
include Base.Comparable.S with type t := t
include Base.Comparisons.S with type t := t
ascending is identical to compare. descending x y = ascending y x. These are intended to be mnemonic when used like List.sort ~compare:ascending and List.sort ~cmp:descending, since they cause the list to be sorted in ascending or descending order, respectively.
clamp_exn t ~min ~max returns t', the closest value to t such that between t' ~low:min ~high:max is true.
Raises if not (min <= max).
val validate_bound :
min:t Base.Maybe_bound.t ->
max:t Base.Maybe_bound.t ->
t Base.Validate.checkmodule Map :
Core_kernel.Map.S_plain
with type Key.t = t
with type Key.comparator_witness = comparator_witnessmodule Set :
Core_kernel.Set.S_plain
with type Elt.t = t
with type Elt.comparator_witness = comparator_witness