def f(opts):
  opts.extra_hc_opts = '-XTemplateHaskell -package template-haskell'
  if (ghc_with_interpreter == 0):
	opts.skip = 1

setTestOpts(f)
setTestOpts(only_compiler_types(['ghc']))
setTestOpts(only_ways(['normal','ghci']))
setTestOpts(if_compiler_profiled(skip))

test('TH_spliceViewPat',
     extra_clean(['Main.o', 'Main.hi', 'A.o', 'A.hi']),
     multimod_compile_and_run,
     ['Main', ''])
