[commit: ghc] wip/T14626: Typo in comments (56cf68a)

[git at git.haskell.org]

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

On branch  : wip/T14626
Link       : http://ghc.haskell.org/trac/ghc/changeset/56cf68a535cdb6a2480711e5402fc78ae229831d/ghc

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

commit 56cf68a535cdb6a2480711e5402fc78ae229831d
Author: Gabor Greif <ggreif at gmail.com>
Date:   Wed Feb 7 16:54:38 2018 +0100

    Typo in comments


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

56cf68a535cdb6a2480711e5402fc78ae229831d
 compiler/basicTypes/PatSyn.hs | 2 +-
 compiler/cmm/CLabel.hs        | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/basicTypes/PatSyn.hs b/compiler/basicTypes/PatSyn.hs
index 35ba8e9..2e838d6 100644
--- a/compiler/basicTypes/PatSyn.hs
+++ b/compiler/basicTypes/PatSyn.hs
@@ -162,7 +162,7 @@ type (T [a] Bool).  For example, this is ill-typed
    f :: T p q -> String
    f (P x) = "urk"
 
-This is differnet to the situation with GADTs:
+This is different to the situation with GADTs:
 
    data S a where
      MkS :: Int -> S Bool
diff --git a/compiler/cmm/CLabel.hs b/compiler/cmm/CLabel.hs
index 9170ee0..3c6beb4 100644
--- a/compiler/cmm/CLabel.hs
+++ b/compiler/cmm/CLabel.hs
@@ -1182,7 +1182,7 @@ pprCLbl (LargeSRTLabel u)  = pprUniqueAlways u <> pp_cSEP <> text "srtd"
 pprCLbl (LargeBitmapLabel u)  = text "b" <> pprUniqueAlways u <> pp_cSEP <> text "btm"
 -- Some bitsmaps for tuple constructors have a numeric tag (e.g. '7')
 -- until that gets resolved we'll just force them to start
--- with a letter so the label will be legal assmbly code.
+-- with a letter so the label will be legal assembly code.
 
 
 pprCLbl (CmmLabel _ str CmmCode)        = ftext str