Commit 5d2b8860 authored by simonpj's avatar simonpj
Browse files

[project @ 2005-05-03 11:05:36 by simonpj]

Add a test for multiple local bindings with TH
parent 65a102be
......@@ -43,3 +43,4 @@ test('rnfail040', normal, multimod_compile_fail, ['rnfail040', '-v0'])
clean(['Rnfail040_A.hi', 'Rnfail040_A.o'])
test('rnfail041', normal, compile_fail, [''])
test('rnfail042', normal, compile_fail, [''])
test('rnfail043', normal, compile_fail, [''])
{-# OPTIONS -fth #-}
-- Duplicate bindings introduced one at a time with TH
module ShouldFail where
f x = x
$([d| h x = x |])
f x = x
Supports Markdown
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