[commit: ghc] master: Typos in comments (244d144)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/244d1441bbe9a8d5e83015c749d1339b8f7c7319/ghc

>---------------------------------------------------------------

commit 244d1441bbe9a8d5e83015c749d1339b8f7c7319
Author: Gabor Greif <ggreif at gmail.com>
Date:   Mon Dec 18 18:36:58 2017 +0100

    Typos in comments


>---------------------------------------------------------------

244d1441bbe9a8d5e83015c749d1339b8f7c7319
 compiler/basicTypes/MkId.hs        | 2 +-
 compiler/simplCore/LiberateCase.hs | 2 +-
 compiler/typecheck/TcRnDriver.hs   | 2 +-
 libraries/base/GHC/Read.hs         | 2 +-
 4 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/compiler/basicTypes/MkId.hs b/compiler/basicTypes/MkId.hs
index 8a62e82..433f70a 100644
--- a/compiler/basicTypes/MkId.hs
+++ b/compiler/basicTypes/MkId.hs
@@ -100,7 +100,7 @@ There are several reasons why an Id might appear in the wiredInIds:
 
 * errorIds, defined in coreSyn/MkCore.hs.
   These error functions (e.g. rUNTIME_ERROR_ID) are wired in
-  becuase the desugarer generates code that mentions them directly
+  because the desugarer generates code that mentions them directly
 
 In all cases except ghcPrimIds, there is a definition site in a
 library module, which may be called (e.g. in higher order situations);
diff --git a/compiler/simplCore/LiberateCase.hs b/compiler/simplCore/LiberateCase.hs
index 342ad73..b484de3 100644
--- a/compiler/simplCore/LiberateCase.hs
+++ b/compiler/simplCore/LiberateCase.hs
@@ -192,7 +192,7 @@ Consider
          g = \y. SMALL...f...
 
 Then we *can* in principle do liberate-case on 'g' (small RHS) but not
-for 'f' (too big).  But doing so is not profitable, becuase duplicating
+for 'f' (too big).  But doing so is not profitable, because duplicating
 'g' at its call site in 'f' doesn't get rid of any cases.  So we just
 ask for the whole group to be small enough.
 
diff --git a/compiler/typecheck/TcRnDriver.hs b/compiler/typecheck/TcRnDriver.hs
index 40b5efe..6ae299b 100644
--- a/compiler/typecheck/TcRnDriver.hs
+++ b/compiler/typecheck/TcRnDriver.hs
@@ -241,7 +241,7 @@ tcRnModuleTcRnM hsc_env hsc_src
 
           -- If the whole module is warned about or deprecated
           -- (via mod_deprec) record that in tcg_warns. If we do thereby add
-          -- a WarnAll, it will override any subseqent depracations added to tcg_warns
+          -- a WarnAll, it will override any subsequent deprecations added to tcg_warns
         let { tcg_env1 = case mod_deprec of
                          Just (L _ txt) -> tcg_env { tcg_warns = WarnAll txt }
                          Nothing        -> tcg_env
diff --git a/libraries/base/GHC/Read.hs b/libraries/base/GHC/Read.hs
index 2d8ee3d..8160a2a 100644
--- a/libraries/base/GHC/Read.hs
+++ b/libraries/base/GHC/Read.hs
@@ -392,7 +392,7 @@ readSymField fieldName readVal = do
 
 -- Note [Why readField]
 --
--- Previousy, the code for automatically deriving Read instance (in
+-- Previously, the code for automatically deriving Read instance (in
 -- typecheck/TcGenDeriv.hs) would generate inline code for parsing fields;
 -- this, however, turned out to produce massive amounts of intermediate code,
 -- and produced a considerable performance hit in the code generator.