type t = |Having
[@@deriving enumerate]may seem strange due to the fact that generatedval all : t listis the empty list, so it seems like it could be of no use.This may be true if you always expect your type to be
Nothing.t, but[@@deriving enumerate]can be useful if you have a type which you expect to change over time. For example, you may have a program which has to interact with multiple servers which are possibly at different versions. It may be useful in this program to have a variant type which enumerates the ways in which the servers may differ. When all the servers are at the same version, you can change this type toNothing.tand code which uses an enumeration of the type will continue to work correctly.This is a similar issue to the identifiability of
Nothing.t. As discussed below, another case where[@deriving enumerate]could be useful is when this type is part of some larger type.
val all : t listval unreachable_code : t -> _Because there are no values of type
Nothing.t, a piece of code that has a value of typeNothing.tmust be unreachable. In such an unreachable piece of code, one can useunreachable_codeto give the code whatever type one needs. For example:let f (r : (int, Nothing.t) Result.t) : int = match r with | Ok i -> i | Error n -> Nothing.unreachable_code n ;;Note that the compiler knows that
Nothing.tis uninhabited, hence this will type without warning:let f (Ok i : (int, Nothing.t) Result.t) = i
It may seem weird that this is identifiable, but we're just trying to anticipate all the contexts in which people may need this. It would be a crying shame if you had some variant type involving Nothing.t that you wished to make identifiable, but were prevented for lack of Identifiable.S here.
include Identifiable.S with type t := t
val hash_fold_t : Hash.state -> t -> Hash.stateval hash : t -> Hash.hash_value
include Sexpable.S with type t := t
val t_of_sexp : Sexplib0.Sexp.t -> tval sexp_of_t : t -> Sexplib0.Sexp.t
include Stringable.S with type t := t
include Comparable.S with type t := t
val ascending : t -> t -> intascendingis identical tocompare.descending x y = ascending y x. These are intended to be mnemonic when used likeList.sort ~compare:ascendingandList.sort ~cmp:descending, since they cause the list to be sorted in ascending or descending order, respectively.
val descending : t -> t -> intval between : t -> low:t -> high:t -> boolbetween t ~low ~highmeanslow <= t <= high
val clamp_exn : t -> min:t -> max:t -> tclamp_exn t ~min ~maxreturnst', the closest value totsuch thatbetween t' ~low:min ~high:maxis true.Raises if
not (min <= max).
val clamp : t -> min:t -> max:t -> t Or_error.t
include Comparator.S with type t := t
val comparator : (t, comparator_witness) Comparator.comparator
val validate_lbound : min:t Maybe_bound.t -> t Validate.checkval validate_ubound : max:t Maybe_bound.t -> t Validate.checkval validate_bound : min:t Maybe_bound.t -> max:t Maybe_bound.t -> t Validate.check
include Pretty_printer.S with type t := t
val pp : Formatter.t -> t -> unit