let all_constraints table pkgname =
  try (Hashtbl.find table pkgname)
  with Not_found -> []