package ocaml-base-compiler

You can search for identifiers within the package.

in-package search v0.2.0

Package contains no libraries

type t = {

stamp : int;
name : string;
mutable flags : int;

}

include Identifiable.S with type t := t

module T : Identifiable.Thing with type t = 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 : Pervasives.out_channel -> T.t -> unit

val print : Format.formatter -> T.t -> unit

module Set : Identifiable.Set with module T := T

module Map : Identifiable.Map with module T := T

module Tbl : Identifiable.Tbl with module T := T

val create : string -> t

val create_persistent : string -> t

val create_predef_exn : string -> t

val rename : t -> t

val name : t -> string

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 make_global : t -> unit

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

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