summaryrefslogtreecommitdiff
path: root/testsuite/tests/rename/should_fail/rnfail043.hs
blob: a978b807ad3bc4d78fa0c369cf3e73f6474308f3 (plain)
1
2
3
4
5
6
7
8
9
10
{-# LANGUAGE TemplateHaskell #-}

-- Duplicate bindings introduced one at a time with TH
module ShouldFail where

f x = x

$([d| h x = x |])

f x = x