TH_repE3.hs 318 Bytes
Newer Older
1 2 3 4 5
-- test the representation of literals and also explicit type annotations

module TH_repE1
where

6
import Language.Haskell.TH
7 8 9 10 11 12 13 14 15 16 17 18 19

emptyListExpr :: ExpQ
emptyListExpr = [| [] |]

singletonListExpr :: ExpQ
singletonListExpr = [| [4] |]

listExpr :: ExpQ
listExpr = [| [4,5,6] |]

consExpr :: ExpQ
consExpr = [| 4:5:6:[] |]