Commit 7055a16c authored by Simon Peyton Jones's avatar Simon Peyton Jones

Test Trac #8540

parent 15bfc034
{-# LANGUAGE TemplateHaskell #-}
module T8540 where
import T8540a
baz :: Int
baz = $foo
{-# LANGUAGE TemplateHaskell #-}
module T8540a (foo) where
import Language.Haskell.TH
foo :: Q Exp
foo = [| bar |]
bar :: Int
bar = 5
......@@ -307,3 +307,7 @@ test('T8455', normal, compile, ['-v0'])
test('T8499', normal, compile, ['-v0'])
test('T7477', normal, compile, ['-v0'])
test('T8507', normal, compile, ['-v0'])
test('T8540',
extra_clean(['T8540a.hi', 'T8540a.o']),
multimod_compile,
['T8540', '-v0 ' + config.ghc_th_way_flags])
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment