X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftests%2FdeSugar%2Fds028.hs;fp=ghc%2Fcompiler%2Ftests%2FdeSugar%2Fds028.hs;h=0000000000000000000000000000000000000000;hb=29b46083beaa048af4b4a68e8f96909ac98a639f;hp=18c0b7d622958b5aff3b97a7e885f25cc77d2b67;hpb=3436a37c72644f82471a7d8c684d67438b86cc3a;p=ghc-hetmet.git

diff --git a/ghc/compiler/tests/deSugar/ds028.hs b/ghc/compiler/tests/deSugar/ds028.hs
deleted file mode 100644
index 18c0b7d..0000000
--- a/ghc/compiler/tests/deSugar/ds028.hs
+++ /dev/null
@@ -1,13 +0,0 @@
---!!! ds028: failable pats in top row
-
-module ShouldSucceed where
-
-
--- when the first row of pats doesn't have convenient
--- variables to grab...
-
-mAp f []	= []
-mAp f (x:xs)	= f x : mAp f xs
-
-True  |||| _	=  True
-False |||| x	=  x