X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=compiler%2Futils%2FOutputable.lhs;fp=compiler%2Futils%2FOutputable.lhs;h=34ee673ad1d245c3a2d5836a69471811a47d0234;hb=b0046dd679244886fdc62e5cc2a73128d2e018bb;hp=fc5a87ee29a50ebb7e5531872112bd7172e1bfd8;hpb=f6648348c41c7fc76eb656254d27defd6a23e8f2;p=ghc-hetmet.git

diff --git a/compiler/utils/Outputable.lhs b/compiler/utils/Outputable.lhs
index fc5a87e..34ee673 100644
--- a/compiler/utils/Outputable.lhs
+++ b/compiler/utils/Outputable.lhs
@@ -501,6 +501,9 @@ instance Outputable Word16 where
 instance Outputable Word32 where
    ppr n = integer $ fromIntegral n
 
+instance Outputable Word where
+   ppr n = integer $ fromIntegral n
+
 instance Outputable () where
    ppr _ = text "()"