[Chicken-users] read-byte, etc.

[Hans Bulfone]

hi,

i'm porting the rfc.mime library from gauche to chicken.

in the library the procedures read-byte, peek-byte and
write-byte are used to read/write bytes which are given
as integers.

at the moment, i'm using

(define (read-byte . args)
  (let ((ch (apply read-char args)))
    (if (eof-object? ch)
        ch
        (char->integer ch))))

and similar definitions which seem to work, but i wonder
if they are still correct with the utf8 egg.

what is the correct way to read a single byte from a port?

regards,
hans.