{-# LANGUAGE TemplateHaskell #-} -- #2674 module ShouldFail where import Language.Haskell.TH $(return [FunD (mkName "foo") []])