let find_all_list x acc =
      try SMap.find x acc with Not_found -> []