diff options
| author | hallgren <hallgren@chalmers.se> | 2016-05-22 20:15:31 +0000 |
|---|---|---|
| committer | hallgren <hallgren@chalmers.se> | 2016-05-22 20:15:31 +0000 |
| commit | 649ab21ceccb09aa9490863bddcb9597898e7217 (patch) | |
| tree | ee711401de1d6474db463acae898e14939efc549 /src/compiler | |
| parent | afd7e5392dfb0b623bd6c76f28d4182a2bff6f52 (diff) | |
Changes for compatibility with GHC 8.0.1
Diffstat (limited to 'src/compiler')
| -rw-r--r-- | src/compiler/GF/Command/Commands.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GF/Command/Commands.hs b/src/compiler/GF/Command/Commands.hs index feaeb0f33..cf1262f35 100644 --- a/src/compiler/GF/Command/Commands.hs +++ b/src/compiler/GF/Command/Commands.hs @@ -44,7 +44,7 @@ pgfEnv pgf = Env pgf mos class (Functor m,Monad m,MonadSIO m) => HasPGFEnv m where getPGFEnv :: m PGFEnv -instance HasPGFEnv m => TypeCheckArg m where +instance (Monad m,HasPGFEnv m) => TypeCheckArg m where typeCheckArg e = (either (fail . render . ppTcError) (return . fst) . flip inferExpr e . pgf) =<< getPGFEnv |