Missed an inline
commit8e9f864112e34f84746c103216173a747cdd02fe
authorBryan O'Sullivan <bos@serpentine.com>
dateTue 15 Feb 2011, 23:31 (16 years ago)
parent658091d
Data/Attoparsec/Char8.hs+1
@@ -427,6 +427,7 @@ number = floaty $ \real frac fracDenom ->
427427 if frac == 0 && fracDenom == 0
428428 then I real
429429 else D (asDouble real frac fracDenom)
430+{-# INLINE number #-}
430431
431432floaty :: Fractional a => (Integer -> Integer -> Integer -> a) -> Parser a
432433{-# INLINE floaty #-}