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