path: root/testsuite/tests/th/T15815A.hs

{-# LANGUAGE TemplateHaskell #-}
module T15815A where

mkFoo tyQ = [d|
    foo :: a ~ $(tyQ) => a
    foo = undefined
  |]