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