summaryrefslogtreecommitdiff
path: root/compiler/GHC/Hs
diff options
context:
space:
mode:
authorEric Lindblad <lindblad@gmx.us>2022-09-13 10:31:23 +0200
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-09-14 03:13:56 -0400
commit646d15ad8f1119f339998ee8dd79ea96cfd1d165 (patch)
tree84bc30035fb31ea0f418384b2399400d53539cbf /compiler/GHC/Hs
parentdc6af9ed87e619d754bfc385df931c81cba6d93a (diff)
downloadhaskell-646d15ad8f1119f339998ee8dd79ea96cfd1d165.tar.gz
Fix typos
This fixes various typos and spelling mistakes in the compiler. Fixes #21891
Diffstat (limited to 'compiler/GHC/Hs')
-rw-r--r--compiler/GHC/Hs/Binds.hs2
-rw-r--r--compiler/GHC/Hs/DocString.hs4
-rw-r--r--compiler/GHC/Hs/Expr.hs2
3 files changed, 4 insertions, 4 deletions
diff --git a/compiler/GHC/Hs/Binds.hs b/compiler/GHC/Hs/Binds.hs
index 1e759208c1..0bb16cc0a7 100644
--- a/compiler/GHC/Hs/Binds.hs
+++ b/compiler/GHC/Hs/Binds.hs
@@ -67,7 +67,7 @@ import Data.Data (Data)
Global bindings (where clauses)
-}
--- the ...LR datatypes are parametrized by two id types,
+-- the ...LR datatypes are parameterized by two id types,
-- one for the left and one for the right.
type instance XHsValBinds (GhcPass pL) (GhcPass pR) = EpAnn AnnList
diff --git a/compiler/GHC/Hs/DocString.hs b/compiler/GHC/Hs/DocString.hs
index 7e35004237..8297d3a2de 100644
--- a/compiler/GHC/Hs/DocString.hs
+++ b/compiler/GHC/Hs/DocString.hs
@@ -124,7 +124,7 @@ instance Binary HsDocStringDecorator where
type LHsDocStringChunk = Located HsDocStringChunk
--- | A continguous chunk of documentation
+-- | A contiguous chunk of documentation
newtype HsDocStringChunk = HsDocStringChunk ByteString
deriving (Eq,Ord,Data, Show)
@@ -192,6 +192,6 @@ unlines' :: [String] -> String
unlines' = intercalate "\n"
-- | Just get the docstring, without any decorators
--- Seperates docstrings using "\n\n", which is how haddock likes to render them
+-- Separates docstrings using "\n\n", which is how haddock likes to render them
renderHsDocStrings :: [HsDocString] -> String
renderHsDocStrings = intercalate "\n\n" . map renderHsDocString
diff --git a/compiler/GHC/Hs/Expr.hs b/compiler/GHC/Hs/Expr.hs
index 5b2ee9dc73..5c40d351ec 100644
--- a/compiler/GHC/Hs/Expr.hs
+++ b/compiler/GHC/Hs/Expr.hs
@@ -1765,7 +1765,7 @@ pprTypedSplice :: (OutputableBndrId p) => Maybe SplicePointName -> LHsExpr (GhcP
pprTypedSplice n e = ppr_splice (text "$$") n e
pprUntypedSplice :: forall p. (OutputableBndrId p)
- => Bool -- Whether to preceed the splice with "$"
+ => Bool -- Whether to precede the splice with "$"
-> Maybe SplicePointName -- Used for pretty printing when exists
-> HsUntypedSplice (GhcPass p)
-> SDoc