Fix Haddock errors.

diff --git a/compiler/utils/GraphPpr.hs b/compiler/utils/GraphPpr.hs
index 1df5158..8149b2a 100644 (file)
--- a/compiler/utils/GraphPpr.hs
+++ b/compiler/utils/GraphPpr.hs
@@ -58,9 +58,9 @@ dumpNode node
 dotGraph 
        :: ( Uniquable k
           , Outputable k, Outputable cls, Outputable color)
-       => (color -> SDoc)              -- | What graphviz color to use for each node color
-                                       --      It's usually safe to return X11 style colors here,
-                                       --      ie "red", "green" etc or a hex triplet #aaff55 etc
+       => (color -> SDoc)  -- ^ What graphviz color to use for each node color
+                           --  It's usually safe to return X11 style colors here,
+                           --  ie "red", "green" etc or a hex triplet #aaff55 etc
        -> Triv k cls color
        -> Graph k cls color -> SDoc
 

diff --git a/compiler/utils/Panic.lhs b/compiler/utils/Panic.lhs
index b8ab86a..97648b7 100644 (file)
--- a/compiler/utils/Panic.lhs
+++ b/compiler/utils/Panic.lhs
@@ -168,7 +168,7 @@ tryUser action = tryJust tc_errors action
   where 
        tc_errors e@(Exception.IOException ioe) | isUserError ioe = Just e
        tc_errors _other = Nothing
-\end{code}     
+\end{code}
 
 Standard signal handlers for catching ^C, which just throw an
 exception in the target thread.  The current target thread is