diff options
author | Eric Lindblad <lindblad@gmx.us> | 2022-09-13 10:31:23 +0200 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-09-14 03:13:56 -0400 |
commit | 646d15ad8f1119f339998ee8dd79ea96cfd1d165 (patch) | |
tree | 84bc30035fb31ea0f418384b2399400d53539cbf /compiler/GHC/Hs | |
parent | dc6af9ed87e619d754bfc385df931c81cba6d93a (diff) | |
download | haskell-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.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/Hs/DocString.hs | 4 | ||||
-rw-r--r-- | compiler/GHC/Hs/Expr.hs | 2 |
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 |