Commit d1ae79f9 authored by Simon Marlow's avatar Simon Marlow

Add a test for #481

parent 6594600c
{-# LANGUAGE TemplateHaskell #-}
module Main where
import Sub
main = print $x
TOP=../../../..
include $(TOP)/mk/boilerplate.mk
include $(TOP)/mk/test.mk
# Recompilation tests
clean:
rm -f *.o *.hi
rm -f B.hs C
# bug #481
recomp009: clean
cp Sub1.hs Sub.hs
'$(TEST_HC)' $(TEST_HC_OPTS) -v0 --make Main.hs
./Main
sleep 1
cp Sub2.hs Sub.hs
-'$(TEST_HC)' $(TEST_HC_OPTS) -v0 --make Main.hs
./Main
{-# LANGUAGE TemplateHaskell #-}
module Sub where
x = [| 1 |]
{-# LANGUAGE TemplateHaskell #-}
module Sub where
x = [| 2 |]
# Test for #481, a recompilation bug with Template Haskell
test('recomp009',
[ clean_cmd('$MAKE -s clean') ],
run_command,
['$MAKE -s --no-print-directory recomp009'])
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