[commit: ghc] master: Typo fix, replace a foldl with foldl' (ded4a1d)

[git at git.haskell.org]

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

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

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

commit ded4a1db4d61b1bc8b5fd73e8eb87cf572efda35
Author: Ömer Sinan Ağacan <omeragacan at gmail.com>
Date:   Wed Dec 12 11:51:20 2018 +0300

    Typo fix, replace a foldl with foldl'


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

ded4a1db4d61b1bc8b5fd73e8eb87cf572efda35
 compiler/codeGen/StgCmmEnv.hs | 6 +++---
 rts/Capability.c              | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/compiler/codeGen/StgCmmEnv.hs b/compiler/codeGen/StgCmmEnv.hs
index f277281..e605762 100644
--- a/compiler/codeGen/StgCmmEnv.hs
+++ b/compiler/codeGen/StgCmmEnv.hs
@@ -114,9 +114,9 @@ addBindC stuff_to_bind = do
 addBindsC :: [CgIdInfo] -> FCode ()
 addBindsC new_bindings = do
         binds <- getBinds
-        let new_binds = foldl (\ binds info -> extendVarEnv binds (cg_id info) info)
-                              binds
-                              new_bindings
+        let new_binds = foldl' (\ binds info -> extendVarEnv binds (cg_id info) info)
+                               binds
+                               new_bindings
         setBinds new_binds
 
 getCgIdInfo :: Id -> FCode CgIdInfo
diff --git a/rts/Capability.c b/rts/Capability.c
index 74f7a29..bda3b0e 100644
--- a/rts/Capability.c
+++ b/rts/Capability.c
@@ -484,7 +484,7 @@ giveCapabilityToTask (Capability *cap USED_IF_DEBUG, Task *task)
     if (task->wakeup == false) {
         task->wakeup = true;
         // the wakeup flag is needed because signalCondition() doesn't
-        // flag the condition if the thread is already runniing, but we want
+        // flag the condition if the thread is already running, but we want
         // it to be sticky.
         signalCondition(&task->cond);
     }