summaryrefslogtreecommitdiff
path: root/testsuite/tests/indexed-types/should_compile/T1769.hs
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/indexed-types/should_compile/T1769.hs')
-rw-r--r--testsuite/tests/indexed-types/should_compile/T1769.hs12
1 files changed, 12 insertions, 0 deletions
diff --git a/testsuite/tests/indexed-types/should_compile/T1769.hs b/testsuite/tests/indexed-types/should_compile/T1769.hs
new file mode 100644
index 0000000000..57b966051b
--- /dev/null
+++ b/testsuite/tests/indexed-types/should_compile/T1769.hs
@@ -0,0 +1,12 @@
+{-# LANGUAGE TypeFamilies, StandaloneDeriving, DeriveDataTypeable, FlexibleInstances #-}
+
+module T1769 where
+
+import Data.Typeable
+
+data family T a
+deriving instance Typeable1 T
+-- deriving instance Functor T
+
+data instance T [b] = T1 | T2 b
+deriving instance Eq b => Eq (T [b])