[Haskell-cafe] Using Template Haskell to automate QuickCheck testing?