package accessor_base

  1. Overview
  2. Docs
type t =
  1. | First
  2. | Second
include sig ... end
val first : ('a -> unit -> unit, 'a -> t -> t, [< Accessor.variant ]) Accessor.t
val second : ('a -> unit -> unit, 'a -> t -> t, [< Accessor.variant ]) Accessor.t
val compare : t -> t -> Base.int
val hash_fold_t : Base.Hash.state -> t -> Base.Hash.state
val hash : t -> Base.Hash.hash_value
val sexp_of_t : t -> Ppx_sexp_conv_lib.Sexp.t