summaryrefslogtreecommitdiff
path: root/testsuite/tests/th/T4949.hs
blob: a1cb8b4d990aa3531a848b1758e1df95ae0cd742 (plain)
1
2
3
4
5
6
7
8
{-# LANGUAGE TemplateHaskell #-}
module Foo where

import Language.Haskell.TH

x :: Int
x = let args = [| show $(varE (mkName "x")) |]
    in undefined