refactoring: Language.Haskell.TH.Tools