diff options
Diffstat (limited to 'compiler/GHC/Linker/Loader.hs')
-rw-r--r-- | compiler/GHC/Linker/Loader.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Linker/Loader.hs b/compiler/GHC/Linker/Loader.hs index 68484eb288..c9617f1c28 100644 --- a/compiler/GHC/Linker/Loader.hs +++ b/compiler/GHC/Linker/Loader.hs @@ -638,8 +638,8 @@ failNonStd dflags srcspan = dieWith dflags srcspan $ text " with" <+> compWay <+> text "using -osuf to set a different object file suffix." where compWay - | WayDyn `elem` ways dflags = text "-dynamic" - | WayProf `elem` ways dflags = text "-prof" + | ways dflags `hasWay` WayDyn = text "-dynamic" + | ways dflags `hasWay` WayProf = text "-prof" | otherwise = text "normal" ghciWay | hostIsDynamic = text "with -dynamic" |