Fixed 2 typos

This commit is contained in:
mainzelm 2001-03-25 17:14:32 +00:00
parent 5d4b66daf4
commit 5b8818ffef
2 changed files with 2 additions and 2 deletions

View File

@ -158,7 +158,7 @@
(char-set-copy char-set:empty)
elts)))
(values (re-char-set (if negate?
(char-set-compelment! cset)
(char-set-complement! cset)
cset))
i)))

View File

@ -50,7 +50,7 @@
;;; This applies to input- and output-ports
(define (fdport-channel-ready? fdport*)
(channel-ready? (fdport-data: channel fdport*)))
(channel-ready? (fdport-data:channel fdport*)))
;Arbitrary, for now.
(define buffer-size 255)