type direct_call_point =| To_ocaml of ocaml_node Direct_call_point.t| To_foreign of foreign_node Direct_call_point.t| To_uninstrumented of uninstrumented_node Direct_call_point.ttype classification =| Allocation of Allocation_point.t| Direct_call of direct_call_point| Indirect_call of Indirect_call_point.t
val classify : t -> classificationval next : t -> t option