diff --git a/README.md b/README.md index 4c7512b8a..8ae112330 100644 --- a/README.md +++ b/README.md @@ -37,7 +37,7 @@ Supports: * GHC 7.10.1 * GHC 7.10.2 * GHC 7.10.3 - * GHC HEAD + * GHC 8.0.1 Usage ----- diff --git a/src/Unsafe.hs b/src/Unsafe.hs index 5e0ba5b83..57c01e47f 100644 --- a/src/Unsafe.hs +++ b/src/Unsafe.hs @@ -6,7 +6,7 @@ module Unsafe ( unsafeTail, unsafeInit, unsafeLast, - fromJust, + unsafeFromJust, unsafeIndex, ) where @@ -26,8 +26,8 @@ unsafeInit = List.init unsafeLast :: [a] -> a unsafeLast = List.last -fromJust :: Maybe.Maybe a -> a -fromJust = Maybe.fromJust +unsafeFromJust :: Maybe.Maybe a -> a +unsafeFromJust = Maybe.fromJust unsafeIndex :: [a] -> Int -> a unsafeIndex = (List.!!)