showPaddingLength :: Int -> String
showPaddingLength num = map chr . map (.&. 0xff) $ [num]
showPaddingLength :: Int -> String
showPaddingLength num = map chr . map (.&. 0xff) $ [num]
showPaddingLength num = map chr . map (.&. 0xff) $ [num]