git.iko.soy/text
on master help sign in
Fix bug that caused encoding Int to loop forever.
cb720feAndrew Martin
Data/Text/Lazy/Builder/Int.hs−3
compare with master
unifiedsplit
@@ -200,9 +200,6 @@ integer :: Int -> Integer -> Builder
200#ifdef INTEGER_GMP
200#ifdef INTEGER_GMP
201integer 10 (S# i#) = decimal (I# i#)
201integer 10 (S# i#) = decimal (I# i#)
202integer 16 (S# i#) = hexadecimal (I# i#)
202integer 16 (S# i#) = hexadecimal (I# i#)
203−#else
204−integer 10 i = decimal i
205−integer 16 i = hexadecimal i
206#endif
203#endif
207integer base i
204integer base i
208 | i < 0 = singleton '-' <> go (-i)
205 | i < 0 = singleton '-' <> go (-i)