
29 May
2009
29 May
'09
5:10 p.m.
On Fri, May 29, 2009 at 3:38 PM, Bartosz Wójcik
Thank you, this is an easy and nice solution. I've made it a bit prettier optically:
myFloat = try (symbol "-" >> float >>= return . negate) <|> try float <|> (integer >>= return . fromIntegral)
Any time you see ">>= return .", something is being missed. Use liftM or <$> instead, i.e. "fromIntegral <$> integer" instead of "integer >>= return . fromIntegral".