let get_annots bhv_opt cfg =
  match  bhv_opt with
    | None -> WpAnnot.get_all_annots cfg 
    | Some bhv -> match WpAnnot.get_behavior_annots bhv cfg with
        | Some annots -> [annots]
        | None -> Wp_parameters.warning "No '%s' behavior in %a@."
                    bhv Kernel_function.pretty_name (Cil2cfg.cfg_kf cfg); []