summaryrefslogtreecommitdiff
path: root/compiler/simplCore/CSE.hs
diff options
context:
space:
mode:
authorGabor Greif <ggreif@gmail.com>2017-01-23 09:38:15 +0100
committerGabor Greif <ggreif@gmail.com>2017-01-23 11:27:22 +0100
commit80560e69ca40abb2c94c4e9fa322365f558a6a8b (patch)
treeba0122a93709a34daeb4db992651e98f3937dc7e /compiler/simplCore/CSE.hs
parent2b64e926a628fb2a3710b0360123ea73331166fe (diff)
downloadhaskell-80560e69ca40abb2c94c4e9fa322365f558a6a8b.tar.gz
Typos and grammar in manual/comments
Diffstat (limited to 'compiler/simplCore/CSE.hs')
-rw-r--r--compiler/simplCore/CSE.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/simplCore/CSE.hs b/compiler/simplCore/CSE.hs
index e364c31cdc..f9314bd362 100644
--- a/compiler/simplCore/CSE.hs
+++ b/compiler/simplCore/CSE.hs
@@ -236,7 +236,7 @@ all trivial expressions. Consider
case x |> co of (y::Array# Int) { ... }
We do not want to extend the substitution with (y -> x |> co); since y
-is of unlifted type, this would desroy the let/app invariant if (x |>
+is of unlifted type, this would destroy the let/app invariant if (x |>
co) was not ok-for-speculation.
But surely (x |> co) is ok-for-speculation, becasue it's a trivial