diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2020-10-08 13:49:50 +0200 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2020-10-08 13:49:50 +0200 |
| commit | eab76694dfbbd10fce74b8ac59bf523a96cf37fa (patch) | |
| tree | cfdaa8bb940803318e43f23f8b960d945c0bf639 /tests | |
| parent | 9638bba137a232541e7f285cdd49b540eb010f41 (diff) | |
| download | stylish-haskell-eab76694dfbbd10fce74b8ac59bf523a96cf37fa.tar.gz | |
SimpleAlign: add multi_way_if flag in config
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/Language/Haskell/Stylish/Step/SimpleAlign/Tests.hs | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/Language/Haskell/Stylish/Step/SimpleAlign/Tests.hs b/tests/Language/Haskell/Stylish/Step/SimpleAlign/Tests.hs index 5b502d1..827022c 100644 --- a/tests/Language/Haskell/Stylish/Step/SimpleAlign/Tests.hs +++ b/tests/Language/Haskell/Stylish/Step/SimpleAlign/Tests.hs @@ -32,6 +32,7 @@ tests = testGroup "Language.Haskell.Stylish.Step.SimpleAlign.Tests" , testCase "case 11" case11 , testCase "case 12" case12 , testCase "case 13" case13 + , testCase "case 13b" case13b ] @@ -213,3 +214,14 @@ case13 = assertSnippet (step Nothing defaultConfig) , " | n < 10, x <- 1 -> x" , " | otherwise -> 2" ] + +case13b :: Assertion +case13b = assertSnippet (step Nothing defaultConfig {cMultiWayIf = False}) + [ "cond n = if" + , " | n < 10, x <- 1 -> x" + , " | otherwise -> 2" + ] + [ "cond n = if" + , " | n < 10, x <- 1 -> x" + , " | otherwise -> 2" + ] |