Bring test suite up to date
This commit is contained in:
5
test/data/template-haskell/Bar.hs
Normal file
5
test/data/template-haskell/Bar.hs
Normal file
@@ -0,0 +1,5 @@
|
||||
{-# LANGUAGE TemplateHaskell #-}
|
||||
module Bar (bar) where
|
||||
import Foo (foo)
|
||||
|
||||
bar = $foo ++ "bar"
|
||||
9
test/data/template-haskell/Foo.hs
Normal file
9
test/data/template-haskell/Foo.hs
Normal file
@@ -0,0 +1,9 @@
|
||||
module Foo (foo, fooQ) where
|
||||
import Language.Haskell.TH
|
||||
import Language.Haskell.TH.Quote (QuasiQuoter(..))
|
||||
|
||||
foo :: ExpQ
|
||||
foo = stringE "foo"
|
||||
|
||||
fooQ :: QuasiQuoter
|
||||
fooQ = QuasiQuoter (litE . stringL) undefined undefined undefined
|
||||
3
test/data/template-haskell/ImportsTH.hs
Normal file
3
test/data/template-haskell/ImportsTH.hs
Normal file
@@ -0,0 +1,3 @@
|
||||
import Bar (bar)
|
||||
|
||||
main = putStrLn bar
|
||||
Reference in New Issue
Block a user