sunterlib/scsh/bytio/load.scm

32 lines
855 B
Scheme
Raw Normal View History

2003-02-11 19:24:31 -05:00
; Copyright (c) 2003 RT Happe <rthappe at web de>
; See the file COPYING distributed with the Scheme Untergrund Library
2004-03-10 13:30:44 -05:00
(define-interface bytio-face
(export read-byte
peek-byte
write-byte
read-bytes!/partial
read-bytes/partial
read-bytes!
read-bytes
write-bytes/partial
write-bytes
))
2003-02-11 19:24:31 -05:00
;; byte (rather than character) i/o
(define-structure bytio bytio-face
(open krims ; assert
2003-02-15 20:15:47 -05:00
sequence-lib ; subsequence sequence-length
2004-03-10 13:30:44 -05:00
byte-vectors
2003-02-15 20:15:47 -05:00
let-opt ; let-optionals
srfi-23 ; error
scsh ; fdes & port stuff, bitwise-and
scheme
2003-02-11 19:24:31 -05:00
ascii ; char<->ascii
i/o ; read-block
ports ; port-buffer
primitives ; copy-bytes!
)
(files rw-bytes))