summaryrefslogtreecommitdiffhomepage
path: root/tests
diff options
context:
space:
mode:
authorJasper Van der Jeugt <m@jaspervdj.be>2012-10-04 09:08:53 +0900
committerJasper Van der Jeugt <m@jaspervdj.be>2012-10-04 09:08:53 +0900
commitdb21c8d5a1cc87beaa666cfb792a4b3625186509 (patch)
treed8f9414bbd021718ad7b7cfab25347a2edf20b22 /tests
parentbb432c025c876f476fb9cfe6ea2c4297d54a3262 (diff)
downloadstylish-haskell-db21c8d5a1cc87beaa666cfb792a4b3625186509.tar.gz
Add failing test case for #18
Diffstat (limited to 'tests')
-rw-r--r--tests/Language/Haskell/Stylish/Step/Imports/Tests.hs8
1 files changed, 6 insertions, 2 deletions
diff --git a/tests/Language/Haskell/Stylish/Step/Imports/Tests.hs b/tests/Language/Haskell/Stylish/Step/Imports/Tests.hs
index ab0e437..aed9419 100644
--- a/tests/Language/Haskell/Stylish/Step/Imports/Tests.hs
+++ b/tests/Language/Haskell/Stylish/Step/Imports/Tests.hs
@@ -32,6 +32,7 @@ input = unlines
, ""
, "import qualified Data.Map as M"
, "import Control.Monad"
+ , "import Only.Instances()"
, "import Data.Map (lookup, (!), insert, Map)"
, ""
, "import Herp.Derp.Internals hiding (foo)"
@@ -51,6 +52,7 @@ case01 = expected @=? testStep (step 80 Global) input
, "import Control.Monad"
, "import Data.Map (Map, insert, lookup, (!))"
, "import qualified Data.Map as M"
+ , "import Only.Instances ()"
, ""
, "import Foo (Bar (..))"
, "import Herp.Derp.Internals hiding (foo)"
@@ -67,8 +69,9 @@ case02 = expected @=? testStep (step 80 Group) input
[ "module Herp where"
, ""
, "import Control.Monad"
- , "import Data.Map (Map, insert, lookup, (!))"
- , "import qualified Data.Map as M"
+ , "import Data.Map (Map, insert, lookup, (!))"
+ , "import qualified Data.Map as M"
+ , "import Only.Instances ()"
, ""
, "import Foo (Bar (..))"
, "import Herp.Derp.Internals hiding (foo)"
@@ -87,6 +90,7 @@ case03 = expected @=? testStep (step 80 None) input
, "import Control.Monad"
, "import Data.Map (Map, insert, lookup, (!))"
, "import qualified Data.Map as M"
+ , "import Only.Instances ()"
, ""
, "import Foo (Bar (..))"
, "import Herp.Derp.Internals hiding (foo)"