Fix handling of ApplicativeDo in TH AST quotes

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