Strings and comments only: 'to to ' fixes

I'd still prefer if a native english speaker would check them.

6 files changed, 7 insertions, 7 deletions

diff --git a/compiler/cmm/cmm-notes b/compiler/cmm/cmm-notes
index 7f7107a18d..1ebe0621a9 100644
--- a/compiler/cmm/cmm-notes
+++ b/compiler/cmm/cmm-notes
@@ -79,7 +79,7 @@ Things to do:
    into separate C procedures.

 

    Short term:

-     compute and attach liveness into to LastCall

+     compute and attach liveness into LastCall

      right at end, split, cvt to old rep

      [must split before cvt, because old rep is not expressive enough]

 

diff --git a/compiler/ghci/ByteCodeInstr.lhs b/compiler/ghci/ByteCodeInstr.lhs
index 7fc84ae214..d93b05905c 100644
--- a/compiler/ghci/ByteCodeInstr.lhs
+++ b/compiler/ghci/ByteCodeInstr.lhs
@@ -86,7 +86,7 @@ data BCInstr
 	-- designers of the new Foreign library.  In particular it is
 	-- quite impossible to convert an Addr to any other integral
 	-- type, and it appears impossible to get hold of the bits of
-	-- an addr, even though we need to to assemble BCOs.
+	-- an addr, even though we need to assemble BCOs.
 
    -- various kinds of application
    | PUSH_APPLY_N
diff --git a/compiler/rename/RnEnv.lhs b/compiler/rename/RnEnv.lhs
index d73b537af0..73475daa5d 100644
--- a/compiler/rename/RnEnv.lhs
+++ b/compiler/rename/RnEnv.lhs
@@ -780,7 +780,7 @@ lookupImpDeprec iface gre
 
 Note [Used names with interface not loaded]
 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-It's (just) possible to to find a used
+It's (just) possible to find a used
 Name whose interface hasn't been loaded:
 
 a) It might be a WiredInName; in that case we may not load
diff --git a/compiler/simplCore/SimplEnv.lhs b/compiler/simplCore/SimplEnv.lhs
index 333eba7f14..5f1013def8 100644
--- a/compiler/simplCore/SimplEnv.lhs
+++ b/compiler/simplCore/SimplEnv.lhs
@@ -722,7 +722,7 @@ See Note [Loop breaking and RULES] in OccAnal.
 
 \begin{code}
 addBndrRules :: SimplEnv -> InBndr -> OutBndr -> (SimplEnv, OutBndr)
--- Rules are added back in to to the bin
+-- Rules are added back into the bin
 addBndrRules env in_id out_id
   | isEmptySpecInfo old_rules = (env, out_id)
   | otherwise = (modifyInScope env final_id, final_id)
diff --git a/compiler/types/TypeRep.lhs b/compiler/types/TypeRep.lhs
index e557a6cbb5..cb5b8f0f18 100644
--- a/compiler/types/TypeRep.lhs
+++ b/compiler/types/TypeRep.lhs
@@ -691,7 +691,7 @@ pprTcApp p pp tc tys
 pprTypeApp :: TyCon -> [Type] -> SDoc
 pprTypeApp tc tys 
   = ppr_type_name_app TopPrec ppr_type (getName tc) (ppr tc) tys
-        -- We have to to use ppr on the TyCon (not its name)
+        -- We have to use ppr on the TyCon (not its name)
         -- so that we get promotion quotes in the right place
 
 pprTypeNameApp :: Prec -> (Prec -> a -> SDoc) -> Name -> [a] -> SDoc
diff --git a/compiler/vectorise/Vectorise/Builtins/Base.hs b/compiler/vectorise/Vectorise/Builtins/Base.hs
index 4f07e6f8da..0cb4bbb7fc 100644
--- a/compiler/vectorise/Vectorise/Builtins/Base.hs
+++ b/compiler/vectorise/Vectorise/Builtins/Base.hs
@@ -194,7 +194,7 @@ indexBuiltin fn f i bi
       text "' is not yet implemented."
     , text "This function does not appear in your source program, but it is needed"
     , text "to compile your code in the backend. This is a known, current limitation"
-    , text "of DPH. If you want it to to work you should send mail to cvs-ghc@haskell.org"
+    , text "of DPH. If you want it to work, you should send mail to cvs-ghc@haskell.org"
     , text "and ask what you can do to help (it might involve some GHC hacking)."])
   where xs = f bi
 
@@ -213,5 +213,5 @@ lookupEnvBuiltin fn env n
       text "' is not yet implemented."
     , text "This function does not appear in your source program, but it is needed"
     , text "to compile your code in the backend. This is a known, current limitation"
-    , text "of DPH. If you want it to to work you should send mail to cvs-ghc@haskell.org"
+    , text "of DPH. If you want it to work, you should send mail to cvs-ghc@haskell.org"
     , text "and ask what you can do to help (it might involve some GHC hacking)."])