summaryrefslogtreecommitdiff
path: root/testsuite/tests/th/T3467.hs
blob: cf495b967335e9d8ab59ba9b9a2ab7e62a83eb04 (plain)
1
2
3
4
5
6
7
8
9
10
11
{-# LANGUAGE TemplateHaskell #-}

-- Test Trac #3467

module T3467 where

import Language.Haskell.TH
import Foreign

sizeq :: Name -> Q Exp
sizeq n = [| sizeOf (undefined :: $(conT n)) |]