Commits

Bryan O'Sullivan committed ef3ffe3

Replace a use of div with quot

This actually makes about a 7% difference in performance!

  • Participants
  • Parent commits a241a93

Comments (0)

Files changed (1)

Data/Text/Lazy/Builder/Int.hs

            | v < 10 = unsafeWrite marr off (i2w v)
            | otherwise = do
           unsafeWrite marr off (i2w (v `rem` 10))
-          go (off-1) (v `div` 10)
+          go (off-1) (v `quot` 10)
 
 minus, zero :: Word16
 {-# INLINE minus #-}