[commit: packages/base] master: Spelling in comments (e312692)

[git at git.haskell.org]

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

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

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

commit e31269229f80795a845091d930e21b153dc0cd0a
Author: Gabor Greif <ggreif at gmail.com>
Date:   Fri Nov 8 08:20:14 2013 +0100

    Spelling in comments


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

e31269229f80795a845091d930e21b153dc0cd0a
 GHC/Event/Poll.hsc |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/GHC/Event/Poll.hsc b/GHC/Event/Poll.hsc
index 572cff6..a832789 100644
--- a/GHC/Event/Poll.hsc
+++ b/GHC/Event/Poll.hsc
@@ -105,7 +105,7 @@ poll p mtout f = do
   return (fromIntegral n)
   where
     -- The poll timeout is specified as an Int, but c_poll takes a CInt. These
-    -- can't be safely coerced as on many systems (e.g. x86_64) CInt has a a
+    -- can't be safely coerced as on many systems (e.g. x86_64) CInt has a
     -- maxBound of (2^32 - 1), even though Int may have a significantly higher
     -- bound.
     --
@@ -132,7 +132,7 @@ poll p mtout f = do
     -- which is the largest value accepted by c_poll. This will result in
     -- c_pollLoop recursing if the provided timeout is larger.
     --
-    -- In case 3, "fromIntegral (maxBound :: CInt) :: Int" wil result in a
+    -- In case 3, "fromIntegral (maxBound :: CInt) :: Int" will result in a
     -- negative Int, max will thus return maxBound :: Int. Since poll doesn't
     -- accept values bigger than maxBound :: Int and CInt is larger than Int,
     -- there is no problem converting Int to CInt for the c_poll call.