[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Chicken-users] How to use the tar egg?
From: |
Kon Lovett |
Subject: |
Re: [Chicken-users] How to use the tar egg? |
Date: |
Wed, 31 May 2006 09:42:52 -0700 |
On May 31, 2006, at 8:33 AM, Peter Busser wrote:
Hi!
Perhaps a stupid question, but how does one open and iterate through a
tar-file using the tar egg?
Never used it so 'grain of salt' time.
(let ([f (open-input-file "sample.tar")])
(let loop ()
(let-values (([ip hr] (tar:open-archived-file f)))
(unless (eof-object? ip)
(process-tar-item hr (read-all ip))
(close-input-port ip)
(loop)))
(close-input-port f))
Groetjes,
Peter.
_______________________________________________
Chicken-users mailing list
address@hidden
http://lists.nongnu.org/mailman/listinfo/chicken-users