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

[ghc-hetmet.git] / ghc / compiler / types / Type.lhs

diff --git a/ghc/compiler/types/Type.lhs b/ghc/compiler/types/Type.lhs
index bf407e5..7fa651a 100644 (file)
--- a/ghc/compiler/types/Type.lhs
+++ b/ghc/compiler/types/Type.lhs
@@ -1037,7 +1037,7 @@ composeTvSubst in_scope env1 env2
        -- First apply env1 to the range of env2
        -- Then combine the two, making sure that env1 loses if
        -- both bind the same variable; that's why env1 is the
-       -- *left* argument to plusVarEnv, because the right arg wins
+       --  *left* argument to plusVarEnv, because the right arg wins
   where
     subst1 = TvSubst in_scope env1