File tree Expand file tree Collapse file tree 1 file changed +4
-3
lines changed
tests/Language/Haskell/Stylish/Step/LanguagePragmas Expand file tree Collapse file tree 1 file changed +4
-3
lines changed Original file line number Diff line number Diff line change @@ -8,7 +8,7 @@ module Language.Haskell.Stylish.Step.LanguagePragmas.Tests
88--------------------------------------------------------------------------------
99import Test.Framework (Test , testGroup )
1010import Test.Framework.Providers.HUnit (testCase )
11- import Test.HUnit (Assertion )
11+ import Test.HUnit (Assertion , (@=?) )
1212
1313
1414--------------------------------------------------------------------------------
@@ -32,6 +32,7 @@ tests = testGroup "Language.Haskell.Stylish.Step.LanguagePragmas.Tests"
3232 , testCase " case 11" case11
3333 , testCase " case 12" case12
3434 , testCase " case 13" case13
35+ , testCase " case 14" case14
3536 ]
3637
3738lANG :: String
@@ -229,8 +230,8 @@ case13 = assertSnippet
229230 ]
230231
231232--------------------------------------------------------------------------------
232- case13 :: Assertion
233- case13 = expected @=? testStep (step Nothing VerticalCompact False False " language" ) input
233+ case14 :: Assertion
234+ case14 = expected @=? testStep (step Nothing VerticalCompact False False " language" ) input
234235 where
235236 input = unlines
236237 [ " {-# LANGUAGE ViewPatterns, OverloadedStrings #-}"
You can’t perform that action at this time.
0 commit comments