diff --git a/Data/Text/Lazy/Builder/Int.hs b/Data/Text/Lazy/Builder/Int.hs
index 88ef0adbec13d3c14786c379238f7cbadd358309..1432d6c56bb99f076c349cbc06956e207bf117de 100644
--- a/Data/Text/Lazy/Builder/Int.hs
+++ b/Data/Text/Lazy/Builder/Int.hs
@@ -186,10 +186,6 @@ hexDigit n
     | otherwise = singleton $! toEnum (fromIntegral n + 87)
 {-# INLINE hexDigit #-}
 
-int :: Int -> Builder
-int = decimal
-{-# INLINE int #-}
-
 data T = T !Integer !Int
 
 integer :: Int -> Integer -> Builder
@@ -248,6 +244,10 @@ integer base i
                               r = fromInteger y
     putB _ = mempty
 
+    int :: Int -> Builder
+    int x | base == 10 = decimal x
+          | otherwise  = hexadecimal x
+
     pblock = loop maxDigits
       where
         loop !d !n