Remove unneeded inline rules for wctwidth, wctlwidth
commit222f2bdaeff78409edcfa68aedb77833fdfce01d
authorJonathan Daugherty <cygnus@foobox.com>
dateWed 28 Nov 2018, 11:26 (8 years ago)
parentc384656
src/Graphics/Text/Width.hs−2
@@ -25,11 +25,9 @@ wcswidth = foldl' (\l c -> wcwidth c + l) 0
2525
2626wctwidth :: T.Text -> Int
2727wctwidth = T.foldl' (\l c -> wcwidth c + l) 0
28−{-# INLINE [1] wctwidth #-}
2928
3029wctlwidth :: TL.Text -> Int
3130wctlwidth = TL.foldl' (\l c -> wcwidth c + l) 0
32−{-# INLINE [1] wctlwidth #-}
3331
3432{-# RULES
3533"wcswidth/unpack" forall x. wcswidth (T.unpack x) = wctwidth x