From 6350abd168b45763b2db174ebd3320bfaf705eec Mon Sep 17 00:00:00 2001
From: panne <unknown>
Date: Fri, 21 Jan 2005 21:52:56 +0000
Subject: [PATCH] =?utf8?q?[project=20@=202005-01-21=2021:52:56=20by=20panne]?=
 =?utf8?q?=20*sigh*=20Once=20again:=20Fixed=20a=20Haddock=20comment=20which=20?=
 =?utf8?q?broke=20"make=20html"...=20Why=20on=20earth=20do=20we=20have=20"ma?=
 =?utf8?q?ke=20validate"=3F=3F=20:=C2=B4-(=20I=20think=20we=20should=20intro?=
 =?utf8?q?duce=20some=20kind=20of=20disciplinary=20punishment=20for=20checki?=
 =?utf8?q?ng=20in=20broken=20Haddock=20comments,=20like=20porting=20the=20ma?=
 =?utf8?q?ngler=20to=20a=20new=20platform=20or=20porting=20Adjustor.c=20to=20?=
 =?utf8?q?an=20ABI=20more=20irregular=20than=20the=20one=20on=20PowerPC...?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 GHC/TopHandler.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/GHC/TopHandler.lhs b/GHC/TopHandler.lhs
index 186fd8e..6082a03 100644
--- a/GHC/TopHandler.lhs
+++ b/GHC/TopHandler.lhs
@@ -29,7 +29,7 @@ import GHC.Prim (unsafeCoerce#)
 
 -- | 'runMainIO' is wrapped around 'Main.main' (or whatever main is
 -- called in the program).  It catches otherwise uncaught exceptions,
--- and also flushes stdout/stderr before exiting.
+-- and also flushes stdout\/stderr before exiting.
 runMainIO :: IO a -> IO a
 runMainIO main = (do a <- main; cleanUp; return a) `catchException` topHandler
 
-- 
1.7.10.4