データの圧縮と展開
Posted feedbacks - Other
Squeak Smalltalk で。
1 2 3 4 5 6 7 | | compress decompress |
compress := [:fname | (FileStream fileNamed: fname) compressFile].
decompress := [:fname | (FileStream fileNamed: fname) viewGZipContents].
compress value: 'a.txt'.
decompress value: 'a.txt.gz'
|
mattsan
#8262()
Rating1/5=0.20
データを圧縮するcompress、展開するdecompressという関数やメソッドなどを書いてください。データはバイト列でもストリームでもそれ以外の形式でもOKです。
圧縮形式は問いませんが、できるだけ一般的なフォーマット(zip,lzhなど)でお願いします。
また、標準以外のライブラリを使う場合には出典の記載をお願いします。
「○○でも実用的な圧縮/展開プログラムがかけるんだぞ!」というのを、ぜひ示してください。
[ reply ]