diff --git a/Flag.hs b/Flag.hs
--- a/Flag.hs
+++ b/Flag.hs
@@ -1,3 +1,5 @@
+{-# LANGUAGE CPP #-}
+
 module Flag where
 
 import DynFlags
@@ -6,5 +8,10 @@
 listFlags :: Options -> IO String
 listFlags opt = return $ convert opt $
    [ "-f" ++ prefix ++ option
-   | (option,_,_) <- fFlags, prefix <- ["","no-"]
+#if __GLASGOW_HASKELL__ == 702
+   | (option,_,_,_) <- fFlags
+#else
+   | (option,_,_) <- fFlags
+#endif
+   , prefix <- ["","no-"]
    ]
diff --git a/elisp/ghc.el b/elisp/ghc.el
--- a/elisp/ghc.el
+++ b/elisp/ghc.el
@@ -16,7 +16,7 @@
 
 ;;; Code:
 
-(defconst ghc-version "1.0.7")
+(defconst ghc-version "1.0.8")
 
 ;; (eval-when-compile
 ;;  (require 'haskell-mode))
diff --git a/ghc-mod.cabal b/ghc-mod.cabal
--- a/ghc-mod.cabal
+++ b/ghc-mod.cabal
@@ -1,5 +1,5 @@
 Name:                   ghc-mod
-Version:                1.0.7
+Version:                1.0.8
 Author:                 Kazu Yamamoto <kazu@iij.ad.jp>
 Maintainer:             Kazu Yamamoto <kazu@iij.ad.jp>
 License:                BSD3