sig type data = Locations.Zone.t val memo : (Cil_types.kernel_function -> data) -> Cil_types.kernel_function -> data val self : State.t end