[project @ 2001-03-29 13:33:46 by simonmar]

[ghc-hetmet.git] / ghc / tests / deSugar / should_compile / ds005.hs

diff --git a/ghc/tests/deSugar/should_compile/ds005.hs b/ghc/tests/deSugar/should_compile/ds005.hs
index 505d500..a02e8d9 100644 (file)
--- a/ghc/tests/deSugar/should_compile/ds005.hs
+++ b/ghc/tests/deSugar/should_compile/ds005.hs
@@ -1,8 +1,8 @@
---!!! ds005 -- mappairs from SLPJ Ch 5'
+-- !!! ds005 -- mappairs from SLPJ Ch 5'
 --
 -- this simply tests a "typical" example
 
-module MapPairs where
+module ShouldCompile where
 
 -- from SLPJ, p 78
 mappairs f []     ys     = []