X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Ftests%2Freader%2Fshould_compile%2Fread010.hs;fp=ghc%2Ftests%2Freader%2Fshould_compile%2Fread010.hs;h=d20f5fcc86b6c871b2e1c179c11f3716051af875;hb=97f5fc60eae89ae61f95622e59a0f6a0a311af4f;hp=579152bc4f9dce771241e90b968091e5487e5680;hpb=4816dbe2409c1c4b6c0393ce4935f1e357e6ffb0;p=ghc-hetmet.git

diff --git a/ghc/tests/reader/should_compile/read010.hs b/ghc/tests/reader/should_compile/read010.hs
index 579152b..d20f5fc 100644
--- a/ghc/tests/reader/should_compile/read010.hs
+++ b/ghc/tests/reader/should_compile/read010.hs
@@ -1,4 +1,4 @@
 -- !!! Infix record constructor.
-module ShouldSucceed where
+module ShouldCompile where
 
 data Rec = (:<-:) { a :: Int, b :: Float }