write-u8 and write-bytevector broken in MIT Scheme 11.2?

[Sam Lee]

In MIT Scheme 11.2, are the "write-u8" and "write-bytevector" procedures
broken?


1 ]=> (write-u8 32)

;The object #[textual-i/o-port 12 for console], passed as an argument to 
#[compiled-procedure 13 ("binary-port" #x3) #x1c #x1217984], is not the correct 
type.
;To continue, call RESTART with an option number:
; (RESTART 1) => Return to read-eval-print level 1



1 ]=> (write-bytevector (string->utf8 "Hello!"))

;The object #[textual-i/o-port 12 for console], passed as an argument to 
#[compiled-procedure 13 ("binary-port" #x3) #x1c #x1f55984], is not the correct 
type.
;To continue, call RESTART with an option number:
; (RESTART 1) => Return to read-eval-print level 1.