Simply passing GHC options to ghc-mod check command.

2011-10-19 19:09:36 +09:00
parent 8051e7df2e
commit cbed907038
4 changed files with 14 additions and 9 deletions
--- a/Check.hs
+++ b/Check.hs
@@ -24,5 +24,5 @@ check opt fileName = withGHC $ checkIt `gcatch` handleErrMsg
        setTargetFile file
        load LoadAllTargets
        liftIO readLog
-    options = ["-Wall","-fno-warn-unused-do-bind"]
+    options = ["-Wall","-fno-warn-unused-do-bind"] ++ ghcOpts opt
           ++ map ("-i" ++) (checkIncludes opt)