offComm' :: Word32 -> PP.Doc
offComm' i = " // " <> sign <> word32HexFixed i'
  where (sign, i') | i < 0 = ("-", -i)
                   | otherwise = ("+", i)
offComm' :: Word32 -> PP.Doc
offComm' i = " // " <> sign <> word32HexFixed i'
  where (sign, i') | i < 0 = ("-", -i)
                   | otherwise = ("+", i)
offComm' i = " // " <> sign <> word32HexFixed i'
  where (sign, i') | i < 0 = ("-", -i)
                   | otherwise = ("+", i)