Skip to content
Snippets Groups Projects

Re-export some 'Way' related functions in DynFlags

Merged Potato Hatsue requested to merge berberman/ghc-api-compat:dynflags into master
1 unresolved thread
Files
2
+ 4
4
@@ -8,10 +8,11 @@ module DynFlags
buildTag,
dynamicGhc,
hostFullWays,
interpWays,
)
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
@@ -25,6 +26,5 @@ buildTag = waysBuildTag . ways
dynamicGhc :: Bool
dynamicGhc = hostIsDynamic
interpWays :: [Way]
interpWays = toList hostFullWays
interpWays :: Set Way
interpWays = hostFullWays
Loading