prettyFieldHex4 :: String -> Word32 -> PP.Doc
prettyFieldHex4 str v = prettyField str (M.mconcat [word32Dec v, " (0x", word16HexFixed (fromIntegral v), ")"])
prettyFieldHex4 :: String -> Word32 -> PP.Doc
prettyFieldHex4 str v = prettyField str (M.mconcat [word32Dec v, " (0x", word16HexFixed (fromIntegral v), ")"])
prettyFieldHex4 str v = prettyField str (M.mconcat [word32Dec v, " (0x", word16HexFixed (fromIntegral v), ")"])