@@ -1726,7 +1726,7 @@ inline = (mempty <$ comment)
1726 <|> (guardEnabled Ext_literate_haskell *> symbol '|' *> doLHSverb)
1726 <|> (guardEnabled Ext_literate_haskell *> symbol '|' *> doLHSverb)
1727 <|> (str . (:[]) <$> primEscape)
1727 <|> (str . (:[]) <$> primEscape)
1728 <|> regularSymbol
1728 <|> regularSymbol
1729− <|> (do res <- symbolIn "#^'`\"[]"
1729+ <|> (do res <- symbolIn "#^'`\"[]&"
1730 pos <- getPosition
1730 pos <- getPosition
1731 let s = T.unpack (untoken res)
1731 let s = T.unpack (untoken res)
1732 report $ ParsingUnescaped s pos
1732 report $ ParsingUnescaped s pos