[SYCL] Sort platforms in platform::get_platforms()

sycl/source/detail/platform_impl.cpp

@@ -203,6 +203,21 @@ std::vector<platform> platform_impl::get_platforms() {
   // may be initialized after.
   GlobalHandler::registerDefaultContextReleaseHandler();
 
+  // Some applications/libraries prefer to implement their own device selection
+  // and default to just providing the first available device. Make sure that
+  // the first platform has the most preferrable device.
+  auto GetPlatformScore = [](const platform &p) {
+    auto devs = p.get_devices();
+    auto it =
+        std::max_element(devs.begin(), devs.end(), [](auto lhs, auto rhs) {
+          return default_selector_v(lhs) < default_selector_v(rhs);
+        });
+    return default_selector_v(*it);
+  };
+  std::stable_sort(Platforms.begin(), Platforms.end(), [&](auto lhs, auto rhs) {
+    return GetPlatformScore(lhs) > GetPlatformScore(rhs);
+  });
+
   return Platforms;
 }