Permalink
Browse files

Fix build when Show has been split out from Num

  • Loading branch information...
1 parent 061a522 commit a674a5153366ad73ad2e00a2a44e710274d9a147 @tibbe tibbe committed Oct 29, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 Blaze/Text/Int.hs
View
@@ -40,7 +40,7 @@ import GHC.Integer.GMP.Internals
# define PAIR(a,b) (a,b)
#endif
-integral :: Integral a => a -> Builder
+integral :: (Integral a, Show a) => a -> Builder
{-# RULES "integral/Int" integral = bounded :: Int -> Builder #-}
{-# RULES "integral/Int8" integral = bounded :: Int8 -> Builder #-}
{-# RULES "integral/Int16" integral = bounded :: Int16 -> Builder #-}

0 comments on commit a674a51

Please sign in to comment.