[minor library changes to be more h2010 compliant
John Meacham <john@repetae.net>**20100721102718
 Ignore-this: 9d642aaa129a6742e906caea500f54bd
] hunk ./lib/base/Control/Monad.hs 1
-module Control.Monad(
-    MonadPlus(mzero, mplus),
-    join, guard, when, unless, ap, msum,
-    filterM, mapAndUnzipM, zipWithM, zipWithM_, foldM,
-    liftM, liftM2, liftM3, liftM4, liftM5,
-
-    foldM_,replicateM,replicateM_,(>=>),(<=<),forever,
-
-    -- ...and what the Prelude exports
-    Monad((>>=), (>>), return, fail),
-    Functor(fmap),
-    mapM, mapM_, sequence, sequence_, (=<<)
-)where
+module Control.Monad (
+    Functor(fmap),  Monad((>>=), (>>), return, fail),  MonadPlus(mzero, mplus),
+    mapM,  mapM_,  forM,  forM_,  sequence,  sequence_,  (=<<),  (>=>),  (<=<),
+    forever,  void,  join,  msum,  filterM,  mapAndUnzipM,  zipWithM,
+    zipWithM_,  foldM,  foldM_,  replicateM,  replicateM_,  guard,  when,
+    unless,  liftM,  liftM2,  liftM3,  liftM4,  liftM5,  ap
+    ) where
hunk ./lib/base/Data/Array.hs 3
-    module Ix,  -- export all of Ix
+    module Data.Ix,  -- export all of Ix
hunk ./lib/base/Data/Maybe.hs 2
-module Data.Maybe(
-    isJust, isNothing,
-    fromJust, fromMaybe, listToMaybe, maybeToList,
-    catMaybes, mapMaybe,
-
-    -- ...and what the Prelude exports
-    Maybe(Nothing, Just),
-    maybe
-  ) where
+module Data.Maybe (
+    Maybe(Nothing, Just),  maybe,  isJust,  isNothing,  fromJust,  fromMaybe,
+    listToMaybe,  maybeToList,  catMaybes,  mapMaybe
+    ) where
hunk ./lib/base/System/Exit.hs 2
-module System.Exit ( ExitCode(ExitSuccess,ExitFailure),
-                     exitWith, exitFailure ) where
+module System.Exit (
+    ExitCode(ExitSuccess,ExitFailure),
+    exitWith, exitFailure, exitSuccess
+    ) where
hunk ./lib/base/System/Exit.hs 24
+exitSuccess :: IO a
hunk ./lib/base/System/Exit.hs 26
+exitSuccess = exitWith ExitSuccess