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

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

Unable to create a simple HTTP server

I have tried to create a simple HTTP server in MIT Scheme 11.2: (let* ((socket (open-tcp-server-socket 8000)) (port (tcp-server-connection-accept socket #t #f)) (request (read-http-request port)) (response (make-simple-http-response "Hello!"))) (write-http-response response