From: Peter H. <p....@gm...> - 2005-10-22 18:10:22
|
Thanks, your example helped :) The trick is the parameter list to socket-make-stream, so for all who may have the same problem, it works for me now with: (setf socket (make-instance 'inet-socket :type :stream :protocol :tcp)) (socket-bind socket (make-inet-address "127.0.0.1" ) 8030) (socket-listen socket 4) ;... telnet to the port... (setf con (socket-accept socket)) (setf stream (socket-make-stream socket :input t :output t :element-type 'base-char :buffering :none)) ... and start happily using stream. What is distracting though is, that the printed representation for that stream is: #<FD-STREAM for "a constant string" {10E2ABD1}> Peter |