diff options
| author | Gabor Greif <ggreif@gmail.com> | 2017-03-06 16:55:42 +0100 |
|---|---|---|
| committer | Gabor Greif <ggreif@gmail.com> | 2017-03-06 16:55:42 +0100 |
| commit | 749740f9c3cb25ee95e04a21c1ef73e1bf96afb1 (patch) | |
| tree | c014979cef6e5f54378df7715b50548a95ef5ece /compiler/simplCore/Simplify.hs | |
| parent | fb9ae288088a3eabc4e1bb4e86fa473a3881d2e2 (diff) | |
| download | haskell-749740f9c3cb25ee95e04a21c1ef73e1bf96afb1.tar.gz | |
Typos in comments and manual
Diffstat (limited to 'compiler/simplCore/Simplify.hs')
| -rw-r--r-- | compiler/simplCore/Simplify.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/simplCore/Simplify.hs b/compiler/simplCore/Simplify.hs index df77742bc4..969fb3ee05 100644 --- a/compiler/simplCore/Simplify.hs +++ b/compiler/simplCore/Simplify.hs @@ -1869,7 +1869,7 @@ be huge. Here's an example (simplCore/should_compile/T7785) foldr (mapFB c1 f) n xs)) = -- Use mapFB rule: mapFB (mapFB c f) g = mapFB c (f.g) - -- We can do this becuase (mapFB c n) is a PAP and hence expandable + -- We can do this because (mapFB c n) is a PAP and hence expandable map f (build (\cn. let c1 = mapFB c n in foldr (mapFB c (f.f)) n x)) |