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