Commit d5d62e54 authored by Simon Marlow's avatar Simon Marlow

add a prof/TH test

parent 87e3228f
def f(opts):
opts.extra_hc_opts = '-fth -package template-haskell'
if not ('ghci' in config.run_ways):
if (ghc_with_interpreter == 0):
opts.skip = 1
setTestOpts(f)
......@@ -21,6 +21,14 @@ test('TH_repPatSig', normal, compile, [''])
test('TH_spliceE5', normal, multimod_compile_and_run, ['TH_spliceE5', '-v0'])
clean(['TH_spliceE5_Lib.hi', 'TH_spliceE5_Lib.o'])
# Testing profiling with TH is a bit tricky; we've already disabled
# the prof way above, and also we want to add options specifically for
# profiling (-osof p_o) because this is necessary when mixing
# profiling w/ TH. Furthermore we must have built the program the
# normal way first, so this is a bit of a hack.
test('TH_spliceE5_prof', normal, multimod_compile_and_run, ['TH_spliceE5', '-v0 -prof -auto-all -osuf p_o'])
clean(['TH_spliceE5_Lib.hi', 'TH_spliceE5_Lib.o'])
test('TH_reifyDecl1', normal, compile, [''])
test('TH_reifyType1', normal, compile, [''])
......
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