Merge pull request #2 from purescript/fromJust

Add fromJust

Author: paf31

README.md

@@ -38,4 +38,11 @@
 
     isNothing :: forall a. Maybe a -> Prim.Boolean
 
-    maybe :: forall a b. b -> (a -> b) -> Maybe a -> b
+    maybe :: forall a b. b -> (a -> b) -> Maybe a -> b
+
+
+## Module Data.Maybe.Unsafe
+
+### Values
+
+    fromJust :: forall a. Maybe a -> a

src/Data/Maybe/Unsafe.purs

@@ -0,0 +1,6 @@
+module Data.Maybe.Unsafe where
+
+import Data.Maybe
+
+fromJust :: forall a. Maybe a -> a
+fromJust (Just x) = x