X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FcoreSyn%2FCoreSubst.lhs;h=582ece2124a83a8861eade2817bfdb4b59974a5a;hb=112ad1978f8c03d26a7df9ac892915dc93724b66;hp=906d3f9e287e547889dcde9772f66a522789f096;hpb=2cb427f4cfdf4c4bc898665250d4ff0d75e3828f;p=ghc-hetmet.git

diff --git a/compiler/coreSyn/CoreSubst.lhs b/compiler/coreSyn/CoreSubst.lhs
index 906d3f9..582ece2 100644
--- a/compiler/coreSyn/CoreSubst.lhs
+++ b/compiler/coreSyn/CoreSubst.lhs
@@ -254,7 +254,8 @@ instance Outputable Subst where
 %************************************************************************
 
 \begin{code}
--- | Apply a substititon to an entire 'CoreExpr'. Rememeber, you may only apply the substitution /once/: see "CoreSubst#apply_once"
+-- | Apply a substititon to an entire 'CoreExpr'. Rememeber, you may only 
+-- apply the substitution /once/: see "CoreSubst#apply_once"
 substExpr :: Subst -> CoreExpr -> CoreExpr
 substExpr subst expr
   = go expr