Commit a68150b6 authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Test Trac #4220

parent e2ce0372
{-# LANGUAGE EmptyDataDecls, DeriveFunctor, DeriveFoldable, DeriveTraversable #-}
module T4220 where
import Data.Foldable
import Data.Traversable
data Void a deriving (Functor, Foldable, Traversable)
......@@ -21,6 +21,7 @@ test('T2856', normal, compile, [''])
test('T3057', if_compiler_lt('ghc', '6.11', expect_fail), compile, [''])
test('T3012', normal, compile, [''])
test('T3965', normal, compile, [''])
test('T4220', normal, compile, [''])
test('drv-functor1',
if_compiler_lt('ghc', '6.11', expect_fail),
......
Markdown is supported
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