Repository : ssh://darcs.haskell.org//srv/darcs/packages/base On branch : ghc-7.4
http://hackage.haskell.org/trac/ghc/changeset/47920f549f5b37115df2dbe84bc885f497ceefe8 >--------------------------------------------------------------- commit 47920f549f5b37115df2dbe84bc885f497ceefe8 Author: Paolo Capriotti <[email protected]> Date: Tue Mar 6 17:58:59 2012 +0000 Fix function name in INLINABLE pragma. >--------------------------------------------------------------- Data/Bits.hs | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/Data/Bits.hs b/Data/Bits.hs index 6639698..891ef5a 100644 --- a/Data/Bits.hs +++ b/Data/Bits.hs @@ -239,7 +239,7 @@ class (Eq a, Num a) => Bits a where where go !c 0 = c go c w = go (c+1) (w .&. (w - 1)) -- clear the least significant bit set - {-# INLINABLE popCountDefault #-} + {-# INLINABLE popCount #-} {- This implementation is intentionally naive. Instances are expected to override it with something optimized for their size. -} _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
