ppxx

Ppxx: a small extension library for writing PPX preprocessors
IN THIS PACKAGE
Module Ppxx . Xast . Ident
include module type of struct include Ident end
type t = Ident.t
include Identifiable.S with type t := t
module T = Ident.T
include Identifiable.Thing with type t := T.t
include Hashtbl.HashedType with type t := T.t
val equal : T.t -> T.t -> bool

The equality predicate used to compare keys.

val hash : T.t -> int

A hashing function on keys. It must be such that if two keys are equal according to equal, then they have identical hash values as computed by hash. Examples: suitable (equal, hash) pairs for arbitrary key types include

  • ((=), Hashtbl.hash) for comparing objects by structure (provided objects do not contain floats)
  • ((fun x y -> compare x y = 0), Hashtbl.hash) for comparing objects by structure and handling Pervasives.nan correctly
  • ((==), Hashtbl.hash) for comparing objects by physical equality (e.g. for mutable or cyclic objects).
include Map.OrderedType with type t := T.t
val output : out_channel -> T.t -> unit
val print : Format.formatter -> T.t -> unit
module Set = Ident.Set
module Map = Ident.Map
module Tbl = Ident.Tbl
val create : string -> t
val create_persistent : string -> t
val create_predef_exn : string -> t
val rename : t -> t
val name : t -> string
val with_name : t -> string -> t
val unique_name : t -> string
val unique_toplevel_name : t -> string
val persistent : t -> bool
val same : t -> t -> bool
val compare : t -> t -> int
val hide : t -> t
val global : t -> bool
val is_predef_exn : t -> bool
val binding_time : t -> int
val current_time : unit -> int
val set_current_time : int -> unit
val reinit : unit -> unit
type 'a tbl = 'a Ident.tbl
val empty : 'a tbl
val add : t -> 'a -> 'a tbl -> 'a tbl
val find_same : t -> 'a tbl -> 'a
val find_name : string -> 'a tbl -> t * 'a
val find_all : string -> 'a tbl -> (t * 'a) list
val fold_name : ( t -> 'a -> 'b -> 'b ) -> 'a tbl -> 'b -> 'b
val fold_all : ( t -> 'a -> 'b -> 'b ) -> 'a tbl -> 'b -> 'b
val iter : ( t -> 'a -> unit ) -> 'a tbl -> unit
val make_key_generator : unit -> t -> t
val format : Utils.Format.formatter -> Ident.t -> unit
val format_verbose : Utils.Format.formatter -> Ident.t -> unit