Commit 6fb1a643 authored by's avatar
Browse files

Do not print HsDoc field when pretty-printing patterns (messes up error message)

parent 27218ba7
......@@ -219,8 +219,8 @@ pprConArgs (PrefixCon pats) = interppSP pats
pprConArgs (InfixCon p1 p2) = interppSP [p1,p2]
pprConArgs (RecCon rpats) = braces (hsep (punctuate comma (map (pp_rpat) rpats)))
pp_rpat (HsRecField v p d) =
hsep [ppr d, ppr v, char '=', ppr p]
pp_rpat (HsRecField v p _d) =
hsep [ppr v, char '=', ppr p]
-- add parallel array brackets around a document
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment