Fix warnings generated by purescript-0.8.0

Author: telser

src/Data/Map.purs

@@ -27,14 +27,14 @@ module Data.Map
   , size
   ) where
 
-import Prelude
+import Prelude (class Ord, class Show, class Functor, class Semigroup, class Eq, (<<<), const, pure, (++), ($), otherwise, (<), (&&), (==), (<=), one, (+), map, zero, show, id, (<$>), (<*>), compare)
 
-import Data.Foldable (foldl, foldMap, foldr, Foldable)
+import Data.Foldable (foldl, foldMap, foldr, class Foldable)
 import Data.List (List(..), length, nub)
 import Data.Maybe (Maybe(..), maybe, isJust)
 import Data.Maybe.Unsafe (unsafeThrow)
-import Data.Monoid (Monoid)
-import Data.Traversable (traverse, Traversable)
+import Data.Monoid (class Monoid)
+import Data.Traversable (traverse, class Traversable)
 import Data.Tuple (Tuple(..), uncurry)
 
 -- | `Map k v` represents maps from keys of type `k` to values of type `v`.

src/Data/StrMap.purs

@@ -36,19 +36,19 @@ module Data.StrMap
   , runST
   ) where
 
-import Prelude
+import Prelude (class Semigroup, class Eq, class Show, class Monad, class Functor, (<>), (<<<), return, (>>=), bind, const, (==), show, (++), (&&), id, (<$>), map, pure, (<*>), (#))
 
 import Control.Monad.Eff (Eff(), runPure)
-import Data.Foldable (Foldable, foldl, foldr, for_)
+import Data.Foldable (class Foldable, foldl, foldr, for_)
 import Data.Function (Fn2(), runFn2, Fn4(), runFn4)
 import Data.Maybe (Maybe(..), maybe, fromMaybe)
-import Data.Monoid (Monoid, mempty)
-import Data.Traversable (Traversable, traverse)
+import Data.Monoid (class Monoid, mempty)
+import Data.Traversable (class Traversable, traverse)
 import Data.Tuple (Tuple(..), uncurry)
 
-import qualified Data.List as L
-import qualified Control.Monad.ST as ST
-import qualified Data.StrMap.ST as SM
+import Data.List as L
+import Control.Monad.ST as ST
+import Data.StrMap.ST as SM
 
 -- | `StrMap a` represents a map from `String`s to values of type `a`.
 foreign import data StrMap :: * -> *

src/Data/StrMap/ST.purs

@@ -10,8 +10,6 @@ module Data.StrMap.ST
   , delete
   ) where
 
-import Prelude
-
 import Control.Monad.Eff (Eff())
 import Control.Monad.ST (ST())
 import Data.Maybe (Maybe(..))

src/Data/StrMap/ST/Unsafe.purs

@@ -2,8 +2,6 @@ module Data.StrMap.ST.Unsafe
   ( unsafeGet
   ) where
 
-import Prelude
-
 import Control.Monad.Eff (Eff())
 import Control.Monad.ST (ST())
 import Data.StrMap (StrMap())

src/Data/StrMap/Unsafe.purs

@@ -2,8 +2,6 @@ module Data.StrMap.Unsafe
   ( unsafeIndex
   ) where
 
-import Prelude
-
 import Data.StrMap (StrMap())
 
 -- | Unsafely get the value for a key in a map.