Skip to content
Snippets Groups Projects
Unverified Commit 06ed5af2 authored by Potato Hatsue's avatar Potato Hatsue
Browse files

Correct the type of interpWays

parent 12955799
No related branches found
No related tags found
No related merge requests found
This commit is part of merge request !2. Comments created here will be created in the context of that merge request.
......@@ -121,6 +121,8 @@ library
if impl(ghc >= 9.0)
hs-source-dirs: src
exposed-modules: Outputable DynFlags
build-depends:
containers >= 0.6.0 && <= 0.6.5
reexported-modules:
GHC.Rename.Bind as RnBinds
, GHC.Rename.Env as RnEnv
......
......@@ -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
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment