Documentation
1
2
3
4
5
import Data.ByteString.Lazy as BS
import Data.Char

main :: IO ()
main = BS.putStr . pack $ fromIntegral . fromEnum . generalCategory <$> ['\0'..]