testsuite/tests/ghc-regress/rename/should_compile/T3221.hs


1
2
3
4
5
6
7
8

{-# OPTIONS_GHC -Werror -fwarn-unused-binds #-}

-- Test Trac #3221: the constructors are used by the deriving
-- 	     	    clause, even though they are not exported

module T3221( Foo ) where

data Foo = Bar | Baz  deriving (Show,Read)