1 files changed, 0 insertions, 39 deletions
diff --git a/testsuite/tests/th/T10891.hs b/testsuite/tests/th/T10891.hs
deleted file mode 100644
index d91caf94f6..0000000000
--- a/testsuite/tests/th/T10891.hs
+++ /dev/null
@@ -1,39 +0,0 @@
-{-# LANGUAGE TypeFamilies #-}
-
-module T10891 where
-
-import Language.Haskell.TH
-import System.IO
-
-class C a where
-  f :: a -> Int
-
-class C' a where
-  type F a :: *
-  type F a = a
-  f' :: a -> Int
-
-class C'' a where
-  data Fd a :: *
-
-instance C' Int where
-  type F Int = Bool
-  f' = id
-
-instance C'' Int where
-  data Fd Int = B Bool | C Char
-
-$(return [])
-
-test :: ()
-test =
-  $(let
-      display :: Name -> Q ()
-      display q = do
-        i <- reify q
-        runIO (hPutStrLn stderr (pprint i) >> hFlush stderr)
-    in do
-      display ''C
-      display ''C'
-      display ''C''
-      [| () |])