src/node.mli

   1 type +'a t = private int
   2 val nil : 'a t
   3 val null : 'a t
   4 val is_nil : 'a t -> bool
   5 val print : Format.formatter -> 'a t -> unit
   6 val compare : 'a t -> 'a t -> int
   7 val equal : 'a t -> 'a t -> bool
   8 val hash : 'a t -> int
   9
  10 external to_int : 'a t -> int = "%identity"
  11 external of_int : int -> 'a t = "%identity"