method vcode_annot annot =
    let _, not_in = add_annot annot to_be_removed in
    if not_in then (* not to be removed *)  Cil.SkipChildren
    else (* is to be removed *)
      match annot.annot_content with
      | AAssert (_, p, _) ->
          R.debug ~level:2 "[rm_asserts] removing redundant %a@." Cil.d_code_annotation annot;
          let status = Checked {emitter="scope"; valid = Maybein
          let p = { p with content = Ptrue } in
          let aassert = AAssert ([], p, {status = status}) in
          let annot = { annot with annot_content = aassert } in
          Cil.ChangeTo annot
      | _ -> Cil.SkipChildren