Template Haskell hack to violate another module's abstractions