Fix bug that caused encoding Int to loop forever.
commitcb720fe821a93e5a1ab8e9f26a2bc761a69ab55e
authorAndrew Martin <amartin@layer3com.com>
dateWed 29 Apr 2015, 12:34 (11 years ago)
parent62e0bb7
Data/Text/Lazy/Builder/Int.hs−3
@@ -200,9 +200,6 @@ integer :: Int -> Integer -> Builder
200200#ifdef INTEGER_GMP
201201integer 10 (S# i#) = decimal (I# i#)
202202integer 16 (S# i#) = hexadecimal (I# i#)
203−#else
204−integer 10 i = decimal i
205−integer 16 i = hexadecimal i
206203#endif
207204integer base i
208205 | i < 0 = singleton '-' <> go (-i)