diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-01-21 02:24:12 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-01-21 02:49:32 -0400 |
| commit | 183bdacca219065e6a888385e3bf309708e827ec (patch) | |
| tree | 6ee1c6ba8b75de8b182fd969b612a8557f72360c /Utility/PartialPrelude.hs | |
| parent | eb9001044f3db682236d1007aded58f47109d6a6 (diff) | |
treak
Diffstat (limited to 'Utility/PartialPrelude.hs')
| -rw-r--r-- | Utility/PartialPrelude.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/PartialPrelude.hs b/Utility/PartialPrelude.hs index ad857196d..507fc6252 100644 --- a/Utility/PartialPrelude.hs +++ b/Utility/PartialPrelude.hs @@ -37,7 +37,7 @@ last = Prelude.last - Ignores leading/trailing whitespace, and throws away any trailing - text after the part that can be read. -} -readMaybe :: (Read a) => String -> Maybe a +readMaybe :: Read a => String -> Maybe a readMaybe s = case reads s of ((x,_):_) -> Just x _ -> Nothing |