diff options
author | Hiromi ISHII <konn.jinro@gmail.com> | 2017-12-25 20:23:13 +0900 |
---|---|---|
committer | Hiromi ISHII <konn.jinro@gmail.com> | 2017-12-25 20:23:13 +0900 |
commit | e83e2023da77ecaa9aaba15bc9bd48757f73b3a9 (patch) | |
tree | f7aae740fa7129c4641cf05a9e00260e48cd92bb /packages/base/src/Internal/Util.hs | |
parent | 87c7682bbfd17308749d5e9568f1ffa25390ce79 (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/base/src/Internal/Util.hs')
-rw-r--r-- | packages/base/src/Internal/Util.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/packages/base/src/Internal/Util.hs b/packages/base/src/Internal/Util.hs index ec21fe4..8c8a31e 100644 --- a/packages/base/src/Internal/Util.hs +++ b/packages/base/src/Internal/Util.hs | |||
@@ -1,3 +1,4 @@ | |||
1 | {-# LANGUAGE CPP #-} | ||
1 | {-# LANGUAGE FlexibleContexts #-} | 2 | {-# LANGUAGE FlexibleContexts #-} |
2 | {-# LANGUAGE FlexibleInstances #-} | 3 | {-# LANGUAGE FlexibleInstances #-} |
3 | {-# LANGUAGE MultiParamTypeClasses #-} | 4 | {-# LANGUAGE MultiParamTypeClasses #-} |
@@ -80,6 +81,9 @@ import Control.Arrow((&&&),(***)) | |||
80 | import Data.Complex | 81 | import Data.Complex |
81 | import Data.Function(on) | 82 | import Data.Function(on) |
82 | import Internal.ST | 83 | import Internal.ST |
84 | #if MIN_VERSION_base(4,11,0) | ||
85 | import Prelude hiding ((<>)) | ||
86 | #endif | ||
83 | 87 | ||
84 | type ℝ = Double | 88 | type ℝ = Double |
85 | type ℕ = Int | 89 | type ℕ = Int |