Re-export some 'Way' related functions in DynFlags

src/DynFlags.hs

@@ -12,7 +12,7 @@ module DynFlags
   )
 where
 
-import Data.Foldable (toList)
+import Data.Set (Set)
 import GHC.Driver.Session
 #if MIN_VERSION_GLASGOW_HASKELL(9,2,0,0)
 import GHC.Platform.Ways
@@ -26,6 +26,5 @@ buildTag = waysBuildTag . ways
 dynamicGhc :: Bool
 dynamicGhc = hostIsDynamic
 
-interpWays :: [Way]
-interpWays = toList hostFullWays
-
+interpWays :: Set Way
+interpWays = hostFullWays