type classification = private| Allocation of Allocation_point.t| Call of Call_point.t
val classify : t -> classificationval next : t -> t option
Foreign.Fieldtype classification = private | Allocation of Allocation_point.t |
| Call of Call_point.t |
val classify : t -> classificationval next : t -> t option