for ghc-7.8