diff options
| author | Inari Listenmaa <inari.listenmaa@gmail.com> | 2025-08-13 13:38:23 +0200 |
|---|---|---|
| committer | Inari Listenmaa <inari.listenmaa@gmail.com> | 2025-08-13 13:38:23 +0200 |
| commit | 9325c8f9fb54d1de1c16f946723a2716fd3fbd86 (patch) | |
| tree | ba01ba5a621471ee27dd4ea0ef200f8bc034abed | |
| parent | 57dc5e9098765bd82e3428fbf0d7f419e502f3e6 (diff) | |
add import Control.Monad when generating .hs with GADTs
| -rw-r--r-- | src/compiler/GF/Compile/PGFtoHaskell.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GF/Compile/PGFtoHaskell.hs b/src/compiler/GF/Compile/PGFtoHaskell.hs index bc8e59f57..948e3a606 100644 --- a/src/compiler/GF/Compile/PGFtoHaskell.hs +++ b/src/compiler/GF/Compile/PGFtoHaskell.hs @@ -51,7 +51,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 | pgf2 = ["import PGF2 hiding (Tree)", "", "showCId :: CId -> String", "showCId = id"] |