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=18c0b7d622958b5aff3b97a7e885f25cc77d2b67;hb=216bfb01a138932092eab3076c85648f5eee99b3;hp=728a0c89bc264fc8c6cc273eeb44ee6ca20e9ff1;hpb=5eb1c77c795f92ed0f4c8023847e9d4be1a4fd0d;p=ghc-hetmet.git

diff --git a/ghc/compiler/tests/deSugar/ds028.hs b/ghc/compiler/tests/deSugar/ds028.hs
index 728a0c8..18c0b7d 100644
--- a/ghc/compiler/tests/deSugar/ds028.hs
+++ b/ghc/compiler/tests/deSugar/ds028.hs
@@ -1,5 +1,8 @@
 --!!! ds028: failable pats in top row
 
+module ShouldSucceed where
+
+
 -- when the first row of pats doesn't have convenient
 -- variables to grab...