ghc-mod-1.0.7: Flag.hs

module Flag where

import DynFlags
import Types

listFlags :: Options -> IO String
listFlags opt = return $ convert opt $
   [ "-f" ++ prefix ++ option
   | (option,_,_) <- fFlags, prefix <- ["","no-"]
   ]