diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2017-07-10 13:00:36 +0200 |
|---|---|---|
| committer | Alan Zimmerman <alan.zimm@gmail.com> | 2017-07-10 13:03:45 +0200 |
| commit | c506f8353755333e21d5ee35bc71d2c8f9ddcb1b (patch) | |
| tree | 9a9db27e35388afca81dcb3596445894165c3382 /testsuite/tests/printer/T13942.stdout | |
| parent | 81377e9e4bd52256946114d9c1dd966d5e3e7692 (diff) | |
| download | haskell-c506f8353755333e21d5ee35bc71d2c8f9ddcb1b.tar.gz | |
Pretty-printer no longer butchers function arrow fixity
It now correctly prints the parens around '(Int -> Int)' in
{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_GHC -ddump-splices #-}
module Bug where
$([d| f :: Either Int (Int -> Int)
f = undefined
|])
Closes #13942
Diffstat (limited to 'testsuite/tests/printer/T13942.stdout')
| -rw-r--r-- | testsuite/tests/printer/T13942.stdout | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/testsuite/tests/printer/T13942.stdout b/testsuite/tests/printer/T13942.stdout new file mode 100644 index 0000000000..2d0f617074 --- /dev/null +++ b/testsuite/tests/printer/T13942.stdout @@ -0,0 +1,12 @@ +T13942.hs:(5,3)-(7,6): Splicing declarations + [d| f :: Either Int (Int -> Int) + f = undefined |] + ======> + f :: Either Int (Int -> Int) + f = undefined +T13942.ppr.hs:(4,3)-(5,22): Splicing declarations + [d| f :: Either Int (Int -> Int) + f = undefined |] + ======> + f :: Either Int (Int -> Int) + f = undefined |