Miss qualified function usage
This commit is contained in:
parent
2d54a5df13
commit
027dfa9d91
@ -233,7 +233,7 @@ $newline never
|
|||||||
}
|
}
|
||||||
|
|
||||||
readMay :: Read a => String -> Maybe a
|
readMay :: Read a => String -> Maybe a
|
||||||
readMay s = case filter (null . snd) $ reads s of
|
readMay s = case filter (Prelude.null . snd) $ reads s of
|
||||||
(x, _):_ -> Just x
|
(x, _):_ -> Just x
|
||||||
[] -> Nothing
|
[] -> Nothing
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user