Fix handling of ApplicativeDo in TH AST quotes

Authored by mgsloan on Jul 12 2018, 9:05 AM.