
#15303: API Annotations lost when parsing tyapp -------------------------------------+------------------------------------- Reporter: alanz | Owner: (none) Type: bug | Status: new Priority: normal | Milestone: 8.6.1 Component: Compiler | Version: 8.4.3 Keywords: | Operating System: Unknown/Multiple Architecture: | Type of failure: Incorrect API Unknown/Multiple | annotation Test Case: | Blocked By: Blocking: | Related Tickets: Differential Rev(s): | Wiki Page: -------------------------------------+------------------------------------- In `Parser.y`, the `typapp` production has {{{#!hs | SIMPLEQUOTE qconop {% ams (sLL $1 $> $ TyElOpr (unLoc $2)) [mj AnnSimpleQuote $1] } | SIMPLEQUOTE varop {% ams (sLL $1 $> $ TyElOpr (unLoc $2)) [mj AnnSimpleQuote $1] } }}} By using `unLoc $2` we are discarding any annotations attached to the `qconop` or `qvarop`. -- Ticket URL: http://ghc.haskell.org/trac/ghc/ticket/15303 GHC http://www.haskell.org/ghc/ The Glasgow Haskell Compiler