val add_exception_ident : Ident.t -> unit
val remove_exception_ident : Ident.t -> unit
val clear_used_primitives : unit -> unit
val get_used_primitives : unit -> Path.t list
type error =
| Unknown_builtin_primitive of string
| Wrong_arity_builtin_primitive of string