summaryrefslogtreecommitdiff
path: root/packages/tests/src/Numeric/LinearAlgebra/Tests/Instances.hs
diff options
context:
space:
mode:
authorHiromi ISHII <konn.jinro@gmail.com>2017-12-25 20:23:13 +0900
committerHiromi ISHII <konn.jinro@gmail.com>2017-12-25 20:23:13 +0900
commite83e2023da77ecaa9aaba15bc9bd48757f73b3a9 (patch)
treef7aae740fa7129c4641cf05a9e00260e48cd92bb /packages/tests/src/Numeric/LinearAlgebra/Tests/Instances.hs
parent87c7682bbfd17308749d5e9568f1ffa25390ce79 (diff)
Workaround for GHC-8.4.x
* Adds missing Semigroup instances * Adds `semigroups` to the deps of `hmatrix` * Hides conflicting names from import list with base >= 4.11 * `(Prelude.<>)` and `GHC.TypeNats.Mod`
Diffstat (limited to 'packages/tests/src/Numeric/LinearAlgebra/Tests/Instances.hs')
-rw-r--r--packages/tests/src/Numeric/LinearAlgebra/Tests/Instances.hs6
1 files changed, 4 insertions, 2 deletions
diff --git a/packages/tests/src/Numeric/LinearAlgebra/Tests/Instances.hs b/packages/tests/src/Numeric/LinearAlgebra/Tests/Instances.hs
index 37f7da2..f0bddd0 100644
--- a/packages/tests/src/Numeric/LinearAlgebra/Tests/Instances.hs
+++ b/packages/tests/src/Numeric/LinearAlgebra/Tests/Instances.hs
@@ -1,4 +1,4 @@
1{-# LANGUAGE FlexibleContexts, UndecidableInstances, FlexibleInstances, ScopedTypeVariables #-} 1{-# LANGUAGE CPP, FlexibleContexts, UndecidableInstances, FlexibleInstances, ScopedTypeVariables #-}
2----------------------------------------------------------------------------- 2-----------------------------------------------------------------------------
3{- | 3{- |
4Module : Numeric.LinearAlgebra.Tests.Instances 4Module : Numeric.LinearAlgebra.Tests.Instances
@@ -32,7 +32,9 @@ import Test.QuickCheck(Arbitrary,arbitrary,choose,vector,sized,shrink)
32import GHC.TypeLits 32import GHC.TypeLits
33import Data.Proxy (Proxy(..)) 33import Data.Proxy (Proxy(..))
34import qualified Numeric.LinearAlgebra.Static as Static 34import qualified Numeric.LinearAlgebra.Static as Static
35 35#if MIN_VERSION_base(4,11,0)
36import Prelude hiding ((<>))
37#endif
36 38
37shrinkListElementwise :: (Arbitrary a) => [a] -> [[a]] 39shrinkListElementwise :: (Arbitrary a) => [a] -> [[a]]
38shrinkListElementwise [] = [] 40shrinkListElementwise [] = []