sig
  type 'a t =
      java'util'concurrent'atomic'AtomicMarkableReference java_instance
  type mark = bool
  val make :
    'a -> AtomicMarkableReference.mark -> 'a AtomicMarkableReference.t
  val attempt_mark :
    'a AtomicMarkableReference.t ->
    'a -> AtomicMarkableReference.mark -> bool
  val compare_and_set :
    'a AtomicMarkableReference.t ->
    'a ->
    'a ->
    AtomicMarkableReference.mark -> AtomicMarkableReference.mark -> bool
  val get : 'a AtomicMarkableReference.t -> 'a * AtomicMarkableReference.mark
  val get_reference : 'a AtomicMarkableReference.t -> 'a
  val is_marked : 'a AtomicMarkableReference.t -> bool
  val set :
    'a AtomicMarkableReference.t ->
    'a -> AtomicMarkableReference.mark -> unit
  val weak_compare_and_set :
    'a AtomicMarkableReference.t ->
    'a ->
    'a ->
    AtomicMarkableReference.mark -> AtomicMarkableReference.mark -> bool
  val null : 'a AtomicMarkableReference.t
  external is_null : 'a AtomicMarkableReference.t -> bool = "java is_null"
  external is_not_null : 'a AtomicMarkableReference.t -> bool
    = "java is_not_null"
  val wrap :
    'a AtomicMarkableReference.t -> 'a AtomicMarkableReference.t option
  val unwrap :
    'a AtomicMarkableReference.t option -> 'a AtomicMarkableReference.t
end