path: root/testsuite/tests/th/TH_bracket2.hs

module TH_bracket2 where

d_show = [d| data A = A

             instance Show A  where
                 show _ = "A"
         |]