[project @ 2005-03-31 10:16:33 by simonmar]

[ghc-hetmet.git] / ghc / compiler / typecheck / TcSimplify.lhs

diff --git a/ghc/compiler/typecheck/TcSimplify.lhs b/ghc/compiler/typecheck/TcSimplify.lhs
index 180a99e..2e04d90 100644 (file)
--- a/ghc/compiler/typecheck/TcSimplify.lhs
+++ b/ghc/compiler/typecheck/TcSimplify.lhs
@@ -1777,7 +1777,7 @@ reduce stack try_me wanted avails
 isAvailable :: Avails -> Inst -> Maybe Avail
 isAvailable avails wanted = lookupFM avails wanted
        -- NB 1: the Ord instance of Inst compares by the class/type info
-       -- *not* by unique.  So
+       --  *not* by unique.  So
        --      d1::C Int ==  d2::C Int
 
 addLinearAvailable :: Avails -> Avail -> Inst -> TcM (Avails, [Inst])