[clisp-list] socket streams

[Rafal S. <R.S...@el...>]

I have a problem with stream sockets in CLISP. 
The following session shows the problem.

$ cat test.lsp
(setq s (socket-server 5555))
(setq x (socket-accept s))
(format x "Hello!~%")
(setq y (read-line x))
(format x "y = ~A~%" y)
(format x "BYE~%")
(force-output x)
(finish-output x)
;(sleep 1)
(close x)
(socket-server-close s)

$ clisp test.lsp &
[1] 13402
$ telnet nabla 5555
Trying 10.0.4.2...
Connected to nabla.ustronet.
Escape character is '^]'.
Hello!
hello
hello
[1]  + done       clisp test.lsp
Connection closed by foreign host.

 
Flushing output doesn't work correct. Where is "BYE".


-- 
Rafal Strzalinski
mailto:rst...@el...            
http://home.elka.pw.edu.pl/~rstrzali