summaryrefslogtreecommitdiff
path: root/tests/examples/ghc86/TH_repPatSigTVar.hs
blob: 5c9f6bd75870c4803aa617fb48a5240aeffb4403 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE TemplateHaskell #-}

module Main
where

import Language.Haskell.TH

$([d| f = \(_ :: Either a b) -> $(sigE (varE 'undefined) (varT ''c)) |])

main :: IO ()
main = return ()