[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Listening to TCP port?
- To: firstname.lastname@example.org
- Subject: Listening to TCP port?
- From: rice@HPP.Stanford.EDU (James Rice)
- Date: 02 Jun 1994 21:42:08 GMT
- Distribution: world
- Newsgroups: comp.lang.lisp.franz, comp.lang.lisp.mcl
- Organization: Knowledge Systems Lab, Stanford University
- Reply-to: James Rice <rice@HPP.Stanford.EDU>
- Xref: news.cambridge.apple.com comp.lang.lisp.franz:208 comp.lang.lisp.mcl:5735
Hi, I'm in search of the necessary (hopefully) 3 lines of code under
each of MCL and EXCL that will let me listen to a TCP port and, upon
receipt of a connection, open a stream to it.
I've peeked in the MACTCP code for MCL, but it doesn't look on the
face of it like it knows how to handle incoming connections. I can't
find any references to doing this under Allegro (but the docs here are
scattered to the four winds, I suspect). I've poked around inside a bit,
but it's all rather inscrutible.
I'm looking for what under Lucid would be done with:
(multiple-value-bind (*socket* *socaddr*) (lucid::make-tcp-socket <<port>>)
(with-open-stream (stream (lucid::accept-tcp-stream *socket* *socaddr*))
Any pointers would be gratefully accepted. Many thanks in advance,