git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Fix import warnings in test suite
commit7e26d582ec789e7e1cbd81f801af279a5dcbc1c0 authorTibor Erdesz <erdeszt@gmail.com> dateMon 24 Aug 2015, 21:10 (11 years ago) parent925f18a
3 files changed+9
compare with golang
unifiedsplit
psci/tests/Main.hs+3 tests/Main.hs+5 tests/common/TestsSetup.hs+1
psci/tests/Main.hs+3
@@ -1,11 +1,14 @@
11{-# LANGUAGE RecordWildCards #-}
22{-# LANGUAGE TupleSections #-}
3+{-# LANGUAGE CPP #-}
34
45module Main where
56
67import Control.Monad.Trans.State.Strict (runStateT)
78import Control.Monad (when, forM)
9+#if __GLASGOW_HASKELL__ < 710
810import Control.Applicative
11+#endif
912import Control.Monad.Writer.Strict (runWriterT)
1013import Control.Monad.Trans.Except (runExceptT)
1114
tests/Main.hs+5
@@ -16,6 +16,7 @@
1616{-# LANGUAGE TupleSections #-}
1717{-# LANGUAGE GeneralizedNewtypeDeriving #-}
1818{-# LANGUAGE FlexibleInstances #-}
19+{-# LANGUAGE CPP #-}
1920
2021-- Failing tests can specify the kind of error that should be thrown with a
2122-- @shouldFailWith declaration. For example:
@@ -41,14 +42,18 @@ import qualified Language.PureScript.CoreFn as CF
4142import Data.Char (isSpace)
4243import Data.Maybe (mapMaybe, fromMaybe)
4344import Data.List (isSuffixOf, sort, stripPrefix)
45+#if __GLASGOW_HASKELL__ < 710
4446import Data.Traversable (traverse)
47+#endif
4548import Data.Time.Clock (UTCTime())
4649
4750import qualified Data.Map as M
4851
4952import Control.Monad
5053import Control.Monad.IO.Class (liftIO)
54+#if __GLASGOW_HASKELL__ < 710
5155import Control.Applicative
56+#endif
5257import Control.Arrow ((>>>))
5358
5459import Control.Monad.Reader
tests/common/TestsSetup.hs+1
@@ -21,6 +21,7 @@ import Data.Maybe (fromMaybe)
2121import Control.Applicative
2222#endif
2323import Control.Monad
24+
2425import Control.Monad.Trans.Maybe
2526
2627import System.Process