diff options
author | Krzysztof Gogolewski <krz.gogolewski@gmail.com> | 2013-10-12 18:39:54 +0200 |
---|---|---|
committer | Krzysztof Gogolewski <krz.gogolewski@gmail.com> | 2013-10-12 18:39:54 +0200 |
commit | 77d2aa5fd4ab6e20f84f3725e7ae6a65fb18d5a1 (patch) | |
tree | 1a60967aa53716fd5abe203aebfaf44fe4efe72b /compiler/vectorise | |
parent | c5262a12a2d3568cc00ffa47a686b3c8e015b2c5 (diff) | |
download | haskell-77d2aa5fd4ab6e20f84f3725e7ae6a65fb18d5a1.tar.gz |
Typos
Diffstat (limited to 'compiler/vectorise')
-rw-r--r-- | compiler/vectorise/Vectorise/Monad/Local.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/vectorise/Vectorise/Monad/Local.hs b/compiler/vectorise/Vectorise/Monad/Local.hs index 5415c5691d..6816627fb9 100644 --- a/compiler/vectorise/Vectorise/Monad/Local.hs +++ b/compiler/vectorise/Vectorise/Monad/Local.hs @@ -34,7 +34,7 @@ readLEnv f = VM $ \_ genv lenv -> return (Yes genv lenv (f lenv)) setLEnv :: LocalEnv -> VM () setLEnv lenv = VM $ \_ genv _ -> return (Yes genv lenv ()) --- |Update the enviroment using the provided function. +-- |Update the environment using the provided function. -- updLEnv :: (LocalEnv -> LocalEnv) -> VM () updLEnv f = VM $ \_ genv lenv -> return (Yes genv (f lenv) ()) |