summaryrefslogtreecommitdiff
path: root/tests/examples/ghc86/TH_spliceE5_Lib.hs
blob: e88d6f50b66625541b9c232f2b08ece39d8326aa (plain)
1
2
3
4
5
6
7
8
9
10
{-# LANGUAGE TemplateHaskell #-}
module TH_spliceE5_Lib where

import Language.Haskell.TH

expandVars :: [String] -> Q Exp
expandVars s = [| concat $(return (ListE (map f s))) |]
  where
    f x = VarE (mkName x)