X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fiface%2FLoadIface.lhs;fp=compiler%2Fiface%2FLoadIface.lhs;h=66cdf7881a48fdca62d99fb81874b409e2a143c8;hp=73b0222f9b3701af59e957407767a5e6fc8c0dda;hb=cb8f0e566e65c1e54de43174668fa3531970c8f5;hpb=92eeda1e1d846a082a60caab1b75593d7cc668ed

diff --git a/compiler/iface/LoadIface.lhs b/compiler/iface/LoadIface.lhs
index 73b0222..66cdf78 100644
--- a/compiler/iface/LoadIface.lhs
+++ b/compiler/iface/LoadIface.lhs
@@ -408,7 +408,7 @@ loadDecl ignore_prags mod (_version, decl)
         -- All a bit too finely-balanced for my liking.
 
         -- This mini-env and lookup function mediates between the
-        -- *Name*s n and the map from *OccName*s to the implicit TyThings
+        --'Name's n and the map from 'OccName's to the implicit TyThings
 	; let mini_env = mkOccEnv [(getOccName t, t) | t <- implicitTyThings thing]
 	      lookup n = case lookupOccEnv mini_env (getOccName n) of
 			   Just thing -> thing