ghc-mod/Language/Haskell/GhcMod/Flag.hs
2013-05-17 10:00:01 +09:00

13 lines
414 B
Haskell

{-# LANGUAGE CPP #-}
module Language.Haskell.GhcMod.Flag where
import qualified Language.Haskell.GhcMod.Gap as Gap
import Language.Haskell.GhcMod.Types
listFlags :: Options -> IO String
listFlags opt = return $ convert opt [ "-f" ++ prefix ++ option
| option <- Gap.fOptions
, prefix <- ["","no-"]
]