diff --git a/src/compiler/api/GF/Compile/PGFtoHaskell.hs b/src/compiler/api/GF/Compile/PGFtoHaskell.hs
index c5704e737..07024712c 100644
--- a/src/compiler/api/GF/Compile/PGFtoHaskell.hs
+++ b/src/compiler/api/GF/Compile/PGFtoHaskell.hs
@@ -50,7 +50,7 @@ grammar2haskell opts name gr = foldr (++++) [] $
           derivingClause
                  | dataExt = "deriving (Show,Data)"
                  | otherwise = "deriving Show"
-          extraImports | gadt = ["import Control.Monad.Identity", "import Data.Monoid"]
+          extraImports | gadt = ["import Control.Monad.Identity", "import Control.Monad", "import Data.Monoid"]
                        | dataExt = ["import Data.Data"]
                        | otherwise = []
           pgfImports = ["import PGF2", ""]