[project @ 2001-08-22 12:24:41 by simonmar]

[ghc-hetmet.git] / ghc / tests / typecheck / should_fail / tcfail072.hs

diff --git a/ghc/tests/typecheck/should_fail/tcfail072.hs b/ghc/tests/typecheck/should_fail/tcfail072.hs
deleted file mode 100644 (file)
index 501976e..0000000
--- a/ghc/tests/typecheck/should_fail/tcfail072.hs
+++ /dev/null
@@ -1,24 +0,0 @@
-{- This program crashed GHC 2.03
-
-   From: Marc van Dongen <dongen@cs.ucc.ie>
-   Date: Sat, 31 May 1997 14:35:40 +0100 (BST)
-
-  zonkIdOcc: g_aoQ
-
-  panic! (the `impossible' happened):
-          lookupBindC:no info!
-  for: g_aoQ
-  (probably: data dependencies broken by an optimisation pass)
-  static binds for:
-  Tmp.$d1{-rmM,x-}
-  local binds for:
--}
-
-module ShouldFail where
-
-data AB p q = A
-            | B p q
-
-g :: (Ord p,Ord q) => (AB p q) -> Bool
-g (B _ _) = g A
-