Dangerous 0.3.1 → 0.3.2
raw patch · 2 files changed
+5/−1 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Control.Dangerous: dangerously :: Dangerous a -> IO a
Files
- Dangerous.cabal +1/−1
- src/Control/Dangerous.hs +4/−0
Dangerous.cabal view
@@ -1,5 +1,5 @@ Name: Dangerous-Version: 0.3.1+Version: 0.3.2 License: MIT License-file: LICENSE Category: Error Handling
src/Control/Dangerous.hs view
@@ -12,6 +12,7 @@ , result , execute , extract+ , dangerously , dangerize ) where @@ -160,6 +161,9 @@ execute :: (Either Exit a, [Warning]) -> IO a execute (r, ws) = mapM_ (hPrint stderr) ws >> extract r++dangerously :: Dangerous a -> IO a+dangerously = execute . runDangerous extract :: Either Exit a -> IO a extract (Left (Stop s)) = putStrLn s >> exitSuccess