Ocaml_compiler.Ident
type 'a tbl
= 'a Ident.tbl
val table_contents : int -> int Ident.tbl -> (int * string * Ident.t) list