let pop c = match !stack with
    | top::tl when top == c ->
        stack := tl; (List.rev c.c_warning, List.rev c.c_depends)
    | _ -> Wp_parameters.fatal "Datalib.Collector: inconsistent stack"