Commit d851a6e1 authored by Andrew Gibiansky's avatar Andrew Gibiansky

Second try at a fix for 7.6.3

parent 0c4149d7
......@@ -88,14 +88,21 @@ pprDynFlags :: Bool -- ^ Whether to include flags which are on by default
-> SDoc
pprDynFlags show_all dflags =
vcat [
#if MIN_VERSION_ghc(7,8,0)
text "GHCi-specific dynamic flag settings:" $$
nest 2 (vcat (map (setting gopt) ghciFlags)),
#if MIN_VERSION_ghc(7,8,0)
text "other dynamic, non-language, flag settings:" $$
nest 2 (vcat (map (setting gopt) others)),
#endif
text "warning settings:" $$
nest 2 (vcat (map (setting wopt) DynFlags.fWarningFlags))
#else
text "GHCi-specific dynamic flag settings:" $$
nest 2 (vcat (map (setting dopt) ghciFlags)),
text "other dynamic, non-language, flag settings:" $$
nest 2 (vcat (map (setting dopt) others)),
text "warning settings:" $$
nest 2 (vcat (map (setting wopt) DynFlags.fWarningFlags))
#endif
]
where
setting test flag
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment