Skip to content

Commit 7089020

Browse files
kianmengmrkkrp
authored andcommitted
Fix typos
Found via `codespell -S CHANGELOG.md -L shouldbe,lits,annd,inconditional,initialls,fo,mis` and `typos --hidden --format brief`
1 parent 102df8c commit 7089020

File tree

11 files changed

+14
-14
lines changed

11 files changed

+14
-14
lines changed

DESIGN.md

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -65,7 +65,7 @@ linear space. There are multiple ways to build a `BriDoc`, not all
6565
of which fit in linear space. So care is necessary to keep memory
6666
bounded.
6767

68-
The compexities of the `BriDoc` structure, together with the lack of
68+
The complexities of the `BriDoc` structure, together with the lack of
6969
documentation, make Brittany at least challenging to maintain.
7070

7171
### Hindent
@@ -386,7 +386,7 @@ but arguably stills achieves consistent style.
386386
Forking or contributing to Hindent is not an option because if we replace
387387
`haskell-src-exts` with `ghc` (or `ghc-exact-print`) then we'll have to work
388388
with a different AST type and all the code in Hindent will become
389-
incompatible and there won't be much code to be re-used in that case. It is
389+
incompatible and there won't be much code to be reused in that case. It is
390390
also possible that we'll find a nicer way to write pretty-printer.
391391

392392
## Examples

app/Main.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -361,7 +361,7 @@ configParser =
361361
help "Fail if formatting is not idempotent"
362362
]
363363
-- We cannot parse the source type here, because we might need to do
364-
-- autodection based on the input file extension (not available here)
364+
-- autodetection based on the input file extension (not available here)
365365
-- before storing the resolved value in the config struct.
366366
<*> pure ModuleSource
367367
<*> (option parseColorMode . mconcat)

data/examples/declaration/data/record-out.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -12,7 +12,7 @@ data Foo = Foo
1212
fooGag,
1313
fooGog ::
1414
NonEmpty
15-
( Indentity
15+
( Identity
1616
Bool
1717
),
1818
-- | Huh!

data/examples/declaration/data/record.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -6,7 +6,7 @@ data Foo = Foo
66
{ fooX :: Int -- ^ X
77
, fooY :: Int -- ^ Y
88
, fooBar, fooBaz :: NonEmpty (Identity Bool) -- ^ BarBaz
9-
, fooGag, fooGog :: NonEmpty (Indentity
9+
, fooGag, fooGog :: NonEmpty (Identity
1010
Bool)
1111
-- ^ GagGog
1212
, fooFoo

data/examples/declaration/rewrite-rule/prelude2-out.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@
1111
-- when we disable the rule that expands (++) into foldr
1212

1313
-- The foldr/cons rule looks nice, but it can give disastrously
14-
-- bloated code when commpiling
14+
-- bloated code when compiling
1515
-- array (a,b) [(1,2), (2,2), (3,2), ...very long list... ]
1616
-- i.e. when there are very very long literal lists
1717
-- So I've disabled it for now. We could have special cases

data/examples/declaration/rewrite-rule/prelude2.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@
1111
-- when we disable the rule that expands (++) into foldr
1212

1313
-- The foldr/cons rule looks nice, but it can give disastrously
14-
-- bloated code when commpiling
14+
-- bloated code when compiling
1515
-- array (a,b) [(1,2), (2,2), (3,2), ...very long list... ]
1616
-- i.e. when there are very very long literal lists
1717
-- So I've disabled it for now. We could have special cases

data/examples/declaration/value/function/arrow/proc-do-complex-out.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -12,7 +12,7 @@ foo
1212
)
1313
-> do
1414
-- Begin do
15-
(x, y) <- -- GHC parser fails if layed out over multiple lines
15+
(x, y) <- -- GHC parser fails if laid out over multiple lines
1616
f -- Call into f
1717
( a,
1818
c -- Tuple together arguments

data/examples/declaration/value/function/arrow/proc-do-complex.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,7 @@ foo
99
(e, f)
1010
) ->
1111
do -- Begin do
12-
(x,y) -- GHC parser fails if layed out over multiple lines
12+
(x,y) -- GHC parser fails if laid out over multiple lines
1313
<- f -- Call into f
1414
(a,
1515
c) -- Tuple together arguments

src/Ormolu/Printer/Meat/Common.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -47,7 +47,7 @@ data FamilyStyle
4747
| -- | Top-level declarations
4848
Free
4949

50-
-- | Outputs the name of the module-like entity, preceeded by the correct prefix ("module" or "signature").
50+
-- | Outputs the name of the module-like entity, preceded by the correct prefix ("module" or "signature").
5151
p_hsmodName :: ModuleName -> R ()
5252
p_hsmodName mname = do
5353
sourceType <- askSourceType
@@ -92,7 +92,7 @@ p_rdrName l = located l $ \x -> do
9292
-- insert spaces when we have a parenthesized operator starting with `#`.
9393
handleUnboxedSumsAndHashInteraction
9494
| unboxedSums,
95-
-- Qualified names do not start wth a `#`.
95+
-- Qualified names do not start with a `#`.
9696
Unqual (occNameString -> '#' : _) <- x =
9797
\y -> space *> y <* space
9898
| otherwise = id

src/Ormolu/Printer/Meat/Declaration/Value.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -121,7 +121,7 @@ p_matchGroup' placer render style mg@MG {..} = do
121121
-- | Function id obtained through pattern matching on 'FunBind' should not
122122
-- be used to print the actual equations because the different ‘RdrNames’
123123
-- used in the equations may have different “decorations” (such as backticks
124-
-- and paretheses) associated with them. It is necessary to use per-equation
124+
-- and parentheses) associated with them. It is necessary to use per-equation
125125
-- names obtained from 'm_ctxt' of 'Match'. This function replaces function
126126
-- name inside of 'Function' accordingly.
127127
adjustMatchGroupStyle ::
@@ -588,7 +588,7 @@ p_hsExpr :: HsExpr GhcPs -> R ()
588588
p_hsExpr = p_hsExpr' NotApplicand N
589589

590590
-- | An applicand is the left-hand side in a function application, i.e. @f@ in
591-
-- @f a@. We need to track this in order to add extra identation in cases like
591+
-- @f a@. We need to track this in order to add extra indentation in cases like
592592
--
593593
-- > foo =
594594
-- > do

0 commit comments

Comments
 (0)