unsafeFromJust

This commit is contained in:
Stephen Diehl
2016-06-06 08:50:12 -04:00
parent 75f5f4d88f
commit d39e014533
2 changed files with 4 additions and 4 deletions
+1 -1
View File
@@ -37,7 +37,7 @@ Supports:
* GHC 7.10.1 * GHC 7.10.1
* GHC 7.10.2 * GHC 7.10.2
* GHC 7.10.3 * GHC 7.10.3
* GHC HEAD * GHC 8.0.1
Usage Usage
----- -----
+3 -3
View File
@@ -6,7 +6,7 @@ module Unsafe (
unsafeTail, unsafeTail,
unsafeInit, unsafeInit,
unsafeLast, unsafeLast,
fromJust, unsafeFromJust,
unsafeIndex, unsafeIndex,
) where ) where
@@ -26,8 +26,8 @@ unsafeInit = List.init
unsafeLast :: [a] -> a unsafeLast :: [a] -> a
unsafeLast = List.last unsafeLast = List.last
fromJust :: Maybe.Maybe a -> a unsafeFromJust :: Maybe.Maybe a -> a
fromJust = Maybe.fromJust unsafeFromJust = Maybe.fromJust
unsafeIndex :: [a] -> Int -> a unsafeIndex :: [a] -> Int -> a
unsafeIndex = (List.!!) unsafeIndex = (List.!!)