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

{-# LANGUAGE TemplateHaskell #-}

module TH_Promoted1Tuple where

import Language.Haskell.TH

$(sequence [tySynD (mkName "F") [] (appT (promotedTupleT 1) (conT ''Int))])