diff options
| author | Gabor Greif <ggreif@gmail.com> | 2018-06-29 14:50:12 +0200 |
|---|---|---|
| committer | Gabor Greif <ggreif@gmail.com> | 2018-06-29 14:50:12 +0200 |
| commit | 9a371d6534549496bb3083853645d6e649743fd2 (patch) | |
| tree | 21c7f8c28a27855136c712c3fcb6884928cd1d11 /compiler/coreSyn/CoreUtils.hs | |
| parent | 4760a8c1d5f5e0daea7a5a3cae7721f4a214d2ff (diff) | |
| download | haskell-9a371d6534549496bb3083853645d6e649743fd2.tar.gz | |
A few typofixes in comments
Diffstat (limited to 'compiler/coreSyn/CoreUtils.hs')
| -rw-r--r-- | compiler/coreSyn/CoreUtils.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/coreSyn/CoreUtils.hs b/compiler/coreSyn/CoreUtils.hs index 8f4f84b550..3c65072974 100644 --- a/compiler/coreSyn/CoreUtils.hs +++ b/compiler/coreSyn/CoreUtils.hs @@ -532,7 +532,7 @@ isDefaultAlt _ = False -- | Find the case alternative corresponding to a particular -- constructor: panics if no such constructor exists findAlt :: AltCon -> [(AltCon, a, b)] -> Maybe (AltCon, a, b) - -- A "Nothing" result *is* legitmiate + -- A "Nothing" result *is* legitimate -- See Note [Unreachable code] findAlt con alts = case alts of |