[project @ 2005-07-25 11:10:01 by simonpj]

Comments

[project @ 2005-07-25 11:10:01 by simonpj]
Comments
e79d44f1 · simonpj · 70349c32 · e79d44f1
Commit e79d44f1 authored Jul 25, 2005 by simonpj
--- a/ghc/compiler/basicTypes/Name.lhs
+++ b/ghc/compiler/basicTypes/Name.lhs
@@ -161,7 +161,7 @@ nameParent name = case nameParent_maybe name of

 isImplicitName :: Name -> Bool
 -- An Implicit Name is one has a parent; that is, one whose definition
-- derives from tehe paren thing
+-- derives from the parent thing
 isImplicitName name = isJust (nameParent_maybe name)

 nameModule name = nameModule_maybe name `orElse` pprPanic "nameModule" (ppr name)