[Haskell-cafe] Multiple stages in Template Haskell