sig val analyze : Kernel_function.t -> unit val get_bounds : Cil_types.stmt -> int option val fold_bounds : (Cil_types.stmt -> int -> 'a -> 'a) -> 'a -> 'a end