Commit edd57645 authored by Gabor Greif's avatar Gabor Greif 💬
Browse files

Some typos in comments

parent a9ff7d08
......@@ -128,7 +128,7 @@ import Data.Data
%* *
%************************************************************************
FastStringEnv can't be in FastString becuase the env depends on UniqFM
FastStringEnv can't be in FastString because the env depends on UniqFM
\begin{code}
type FastStringEnv a = UniqFM a -- Keyed by FastString
......
......@@ -256,11 +256,11 @@ Consider
False -> 2#
in ...)
The z# binding is ok becuase the RHS is ok-for-speculation,
The z# binding is ok because the RHS is ok-for-speculation,
but Lint will complain unless it can *see* that. So we
preserve the evaluated-ness on 'y' in tidyBndr.
(Another alterantive would be to tidy unboxed lets into cases,
(Another alternative would be to tidy unboxed lets into cases,
but that seems more indirect and surprising.)
......
......@@ -804,7 +804,7 @@ genSwitch cond maybe_ids = do
let pairs = [ (ix, id) | (ix,Just id) <- zip [0..] maybe_ids ]
let labels = map (\(ix, b) -> (mkIntLit ty ix, blockIdToLlvm b)) pairs
-- out of range is undefied, so lets just branch to first label
-- out of range is undefined, so let's just branch to first label
let (_, defLbl) = head labels
let s1 = Switch vc defLbl labels
......
......@@ -82,7 +82,7 @@ See #7730, #8776 for details -}
-- | Pretty-prints a 'FamInst' (type/data family instance) with its defining location.
pprFamInst :: FamInst -> SDoc
-- * For data instances we go via pprTyThing of the represntational TyCon,
-- becuase there is already much cleverness associated with printing
-- because there is already much cleverness associated with printing
-- data type declarations that I don't want to duplicate
-- * For type instances we print directly here; there is no TyCon
-- to give to pprTyThing
......
......@@ -606,7 +606,7 @@ makeImportsDoc dflags imports
then text ".section .note.GNU-stack,\"\",@progbits"
else empty)
$$
-- And just because every other compiler does, lets stick in
-- And just because every other compiler does, let's stick in
-- an identifier directive: .ident "GHC x.y.z"
(if platformHasIdentDirective platform
then let compilerIdent = text "GHC" <+> text cProjectVersion
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment