Skip to content

Commit 3ab1085

Browse files
committed
Mark caseConvert (the underlying implementation of toUpper / toLower / toTitle) as INLINABLE, not INLINE
This is fairly large function, we should not force GHC's hand to inline it.
1 parent 6a98da6 commit 3ab1085

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/Data/Text/Internal/Transformation.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -142,7 +142,7 @@ caseConvert ascii remap (Text src o l) = runST $ do
142142
i -> writeMapping dst i dstOff
143143
inner (srcOff + 4) dstOff'
144144

145-
{-# INLINE caseConvert #-}
145+
{-# INLINABLE caseConvert #-}
146146

147147
writeMapping :: A.MArray s -> Int64 -> Int -> ST s Int
148148
writeMapping !_ 0 !dstOff = pure dstOff

0 commit comments

Comments
 (0)