Add MultiParamTypeClasses to tests with fun deps

GHC 7.0.4 needs this.
haskell · Dec 27, 2020 · 9d1e29a · 9d1e29a
1 parent 5c80b85
commit 9d1e29a
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 3 deletions.
diff --git a/tests/monaderror-explist.y b/tests/monaderror-explist.y
@@ -1,5 +1,8 @@
 {
-{-# LANGUAGE FunctionalDependencies, FlexibleInstances #-}
+{-# LANGUAGE FunctionalDependencies #-}
+{-# LANGUAGE FlexibleInstances #-}
+-- For ancient GHC 7.0.4
+{-# LANGUAGE MultiParamTypeClasses #-}
 module Main where
 
 import Data.Char

diff --git a/tests/monaderror.y b/tests/monaderror.y
@@ -1,5 +1,8 @@
 {
-{-# LANGUAGE FunctionalDependencies, FlexibleInstances #-}
+{-# LANGUAGE FunctionalDependencies #-}
+{-# LANGUAGE FlexibleInstances #-}
+-- For ancient GHC 7.0.4
+{-# LANGUAGE MultiParamTypeClasses #-}
 module Main where
 
 import Control.Monad (when)

diff --git a/tests/typeclass_monad_lexer.y b/tests/typeclass_monad_lexer.y
@@ -1,5 +1,9 @@
 {
-{-# LANGUAGE FunctionalDependencies, FlexibleInstances, UndecidableInstances #-}
+{-# LANGUAGE FunctionalDependencies #-}
+{-# LANGUAGE FlexibleInstances #-}
+-- For ancient GHC 7.0.4
+{-# LANGUAGE MultiParamTypeClasses #-}
+{-# LANGUAGE UndecidableInstances #-}
 import Control.Monad (liftM, ap)
 import Control.Applicative as A
 }