[project @ 1999-06-08 16:46:44 by simonpj]

[ghc-hetmet.git] / ghc / compiler / simplCore / Simplify.lhs

diff --git a/ghc/compiler/simplCore/Simplify.lhs b/ghc/compiler/simplCore/Simplify.lhs
index db0534e..189f0f6 100644 (file)
--- a/ghc/compiler/simplCore/Simplify.lhs
+++ b/ghc/compiler/simplCore/Simplify.lhs
@@ -688,7 +688,7 @@ simplVar var cont
 #ifdef DEBUG
                                            if isLocallyDefined var && not (idMustBeINLINEd var)
                                                -- The idMustBeINLINEd test accouunts for the fact
-                                               -- that class method selectors don't have top level
+                                               -- that class dictionary constructors don't have top level
                                                -- bindings and hence aren't in scope.
                                            then
                                                -- Not in scope