X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fcmm%2FDFMonad.hs;fp=compiler%2Fcmm%2FDFMonad.hs;h=209403e540c3e207d3e82463e5bd73a67f6efd5f;hb=044ba2360d602a5d4e3dc709b91b21d184a37f64;hp=3df5b681cfe810c10d2fa2723788be8dd98581d6;hpb=058795e0b9226b8f6a1b52676e5e1ea4eead36c1;p=ghc-hetmet.git

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 ()