Support wild cards in TH splices
[ghc.git] / testsuite / tests / partial-sigs / should_compile / SplicesUsed.hs
1 {-# LANGUAGE TemplateHaskell #-}
2 {-# LANGUAGE PartialTypeSignatures #-}
3 module SplicesUsed where
4
5 import Splices
6
7 maybeBool :: $(metaType1)
8 maybeBool = $(metaExp2) $(metaExp1)
9
10 charA :: a -> $(metaType2)
11 charA x = ('x', x)
12
13 filter' :: $(metaType3)
14 filter' = filter
15
16 $(metaDec1)
17
18 $(metaDec2)