haskell-src-exts-1.17.0: tests/examples/QuasiQuoteSplice.hs.prettyprinter.golden

{-# LANGUAGE TemplateHaskell, RankNTypes #-}
{-# OPTIONS_GHC -F -pgmFtrhsx #-}
module Main (main) where
import Language.Haskell.TH

data PageFunction m a = PF
main
  = let a = mkName "a" in
      runQ [t| forall m . PageFunction m $( conT (mkName "a") ) |] >>=
        print