From: Max Bolingbroke <batterseapower@hotmail.com>
Date: Thu, 31 Jul 2008 01:23:36 +0000 (+0000)
Subject: Document DFMonad
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=044ba2360d602a5d4e3dc709b91b21d184a37f64;p=ghc-hetmet.git

Document DFMonad
---

diff --git a/compiler/cmm/DFMonad.hs b/compiler/cmm/DFMonad.hs
index 3df5b68..209403e 100644
--- a/compiler/cmm/DFMonad.hs
+++ b/compiler/cmm/DFMonad.hs
@@ -82,7 +82,7 @@ class DataflowAnalysis m where
   markFactsUnchanged :: m f ()   -- ^ Useful for starting a new iteration
   factsStatus :: m f ChangeFlag
   subAnalysis :: m f a -> m f a  -- ^ Do a new analysis and then throw away
-                                 -- *all* the related state.
+                                 -- /all/ the related state.
 
   getFact :: BlockId -> m f f
   setFact :: Outputable f => BlockId -> f -> m f ()