let parse_pref_package (_,s) =
  if Pcre.pmatch ~rex:general_regexp s then Pref.Star
  else Pref.Package (Packages.parse_name (Format822.dummy_loc,s))