expose rest of safe functions

2016-04-09 20:17:55 -04:00
parent 1a6ce9436f
commit 26c148510e
3 changed files with 21 additions and 7 deletions
@@ -30,8 +30,21 @@ import qualified Applicative as X
 -- Maybe'ized version of partial functions
 import Safe as X (
    headMay
+  , headDef
  , initMay
+  , initDef
+  , initSafe
  , tailMay
+  , tailDef
+  , tailSafe
+  , lastDef
+  , lastMay
+  , lookupJust
+  , findJust
+  , foldr1May
+  , foldl1May
+  , atMay
+  , atDef
  )

 -- Applicatives
@@ -233,10 +246,10 @@ import Control.Monad.ST as ST

 -- Concurrency and Parallelism
 import Control.Exception as X
+import Control.Monad.STM as X
 import Control.Concurrent as X
 import Control.Concurrent.Async as X

-
 import Foreign.Storable as Exports (Storable)

 -- Read instances hiding unsafe builtins (read)