Commit 1f170c8f authored by Simon Marlow's avatar Simon Marlow

add test for #2685

parent 3ab6cf6c
{-# LANGUAGE TemplateHaskell #-}
module T2685 where
import T2685a
$( th )
{-# LANGUAGE TemplateHaskell #-}
module T2685a (th) where
import Language.Haskell.TH
newtype NT = C (() -> ())
th :: Q [Dec]
th = [d| foo = C undefined |]
......@@ -120,3 +120,5 @@ test('T2386', extra_clean(['T2386_Lib.hi', 'T2386_Lib.o']),
run_command,
['$MAKE -s --no-print-directory T2386'] )
test('TH_emptycase', exit_code(1), compile_and_run, [''])
test('T2685', normal, multimod_compile, ['T2685','-v0'])
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