let get_lval_infos lval stmt =
  let decl = Cil.extract_varinfos_from_lval lval in
  let dpds, loc = !Db.Value.lval_to_loc_with_deps
                    ~with_alarms:CilE.warn_none_mode
                    (Kstmt stmt)
                    ~deps:Locations.Zone.bottom lval
  in
  let l_loc = Locations.valid_enumerate_bits loc in
  let exact =  Locations.valid_cardinal_zero_or_one loc in
    (l_loc, exact, dpds, decl)