diff options
| author | Andreas Källberg <anka.213@gmail.com> | 2020-09-09 11:05:41 +0200 |
|---|---|---|
| committer | Andreas Källberg <anka.213@gmail.com> | 2020-09-09 11:05:41 +0200 |
| commit | 9d8cd55cd5e492ed8996fe86cc1145989f1bf51b (patch) | |
| tree | 53cb745eafd2598d98980d7a63a2686ac20c921e /src/compiler/GF/Interactive.hs | |
| parent | 150b592aa9da46b9fa9d19f4b0e692c52f35ebee (diff) | |
Import orphan instances of MonadFail for ghc<8
Also upgrade alex/happy so automatic install works
Diffstat (limited to 'src/compiler/GF/Interactive.hs')
| -rw-r--r-- | src/compiler/GF/Interactive.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/compiler/GF/Interactive.hs b/src/compiler/GF/Interactive.hs index b68a1bc2f..c292fe944 100644 --- a/src/compiler/GF/Interactive.hs +++ b/src/compiler/GF/Interactive.hs @@ -38,6 +38,9 @@ import GF.Server(server) #endif import GF.Command.Messages(welcome) +import GF.Infra.UseIO (Output) +-- Provides an orphan instance of MonadFail for StateT in ghc versions < 8 +import Control.Monad.Trans.Instances () -- | Run the GF Shell in quiet mode (@gf -run@). mainRunGFI :: Options -> [FilePath] -> IO () @@ -131,7 +134,8 @@ execute1' s0 = "dt":ws -> define_tree ws -- ordinary commands _ -> do env <- gets commandenv - interpretCommandLine env s0 + -- () env s0 + -- interpretCommandLine env s0 continue where continue,stop :: ShellM Bool |