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

Test Snoyman's emailed data family deriving program

parent ce026bc9
{-# LANGUAGE TypeFamilies #-}
module DataFamDeriv where
data family Foo a
data Bar = Bar
data instance Foo Bar
= Bar1 | Bar2 | Bar3 | Bar4 | Bar5 | Bar6 | Bar7 | Bar8 | Bar9
deriving Eq
......@@ -159,3 +159,4 @@ test('T4356', normal, compile, [''])
test('T4484', normal, compile, [''])
test('T4492', normal, compile, [''])
test('T4494', normal, compile, [''])
test('DataFamDeriv', normal, compile, [''])
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