diff options
| -rw-r--r-- | hadrian/src/Flavour.hs | 2 | ||||
| -rw-r--r-- | hadrian/src/Hadrian/Oracles/TextFile.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/hadrian/src/Flavour.hs b/hadrian/src/Flavour.hs index 33d4d68ec4..288d5ccc3d 100644 --- a/hadrian/src/Flavour.hs +++ b/hadrian/src/Flavour.hs @@ -352,7 +352,7 @@ applySettings kvs = case partitionEithers (map applySetting kvs) of -- x = -b -- x += -c -- produce the final x = "-b -c" value. With just (.) we would apply - -- the x = -b assignment last, which would silently drop the -c adddition. + -- the x = -b assignment last, which would silently drop the -c addition. -- -- foldr (.) id [f, g, h] = f . g . h -- -- first function (f) is applied last, we're applying them in diff --git a/hadrian/src/Hadrian/Oracles/TextFile.hs b/hadrian/src/Hadrian/Oracles/TextFile.hs index faf2f561ef..560d5d607a 100644 --- a/hadrian/src/Hadrian/Oracles/TextFile.hs +++ b/hadrian/src/Hadrian/Oracles/TextFile.hs @@ -67,7 +67,7 @@ lookupValuesOrError file key = fromMaybe (error msg) <$> lookupValues file key lookupDependencies :: FilePath -> FilePath -> Action (FilePath, [FilePath]) lookupDependencies depFile file = do let -- .hs needs to come before .hi-boot deps added to fix #14482. - -- This is still a bit fragile: we have no order guaranty from the input + -- This is still a bit fragile: we have no order guarantee from the input -- file. Let's hope we don't have two different .hs source files (e.g. -- one included into the other)... weigh p |