diff options
author | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-10-04 09:08:53 +0900 |
---|---|---|
committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-10-04 09:08:53 +0900 |
commit | db21c8d5a1cc87beaa666cfb792a4b3625186509 (patch) | |
tree | d8f9414bbd021718ad7b7cfab25347a2edf20b22 /tests | |
parent | bb432c025c876f476fb9cfe6ea2c4297d54a3262 (diff) | |
download | stylish-haskell-db21c8d5a1cc87beaa666cfb792a4b3625186509.tar.gz |
Add failing test case for #18
Diffstat (limited to 'tests')
-rw-r--r-- | tests/Language/Haskell/Stylish/Step/Imports/Tests.hs | 8 |
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)" |