[commit: ghc] master: This note's name has been fixed (955dfcb)
git at git.haskell.org
git at git.haskell.org
Tue Aug 19 06:39:18 UTC 2014
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/955dfcba4d48e9b5795bc80e79c5c7c2bade432b/ghc
>---------------------------------------------------------------
commit 955dfcba4d48e9b5795bc80e79c5c7c2bade432b
Author: Gabor Greif <ggreif at gmail.com>
Date: Tue Aug 19 08:35:06 2014 +0200
This note's name has been fixed
>---------------------------------------------------------------
955dfcba4d48e9b5795bc80e79c5c7c2bade432b
compiler/simplCore/OccurAnal.lhs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/compiler/simplCore/OccurAnal.lhs b/compiler/simplCore/OccurAnal.lhs
index 42a6167..2ce32a1 100644
--- a/compiler/simplCore/OccurAnal.lhs
+++ b/compiler/simplCore/OccurAnal.lhs
@@ -1199,7 +1199,7 @@ occAnal env (Cast expr co)
= case occAnal env expr of { (usage, expr') ->
let usage1 = markManyIf (isRhsEnv env) usage
usage2 = addIdOccs usage1 (coVarsOfCo co)
- -- See Note [Gather occurrences of coercion veriables]
+ -- See Note [Gather occurrences of coercion variables]
in (usage2, Cast expr' co)
-- If we see let x = y `cast` co
-- then mark y as 'Many' so that we don't
More information about the ghc-commits
mailing list