[Gcl-devel] gcl sockets

[root]

Camm,

I'm having a bit of trouble with sockets in GCL.
I can do:

(in-package "SYSTEM")
(setq sock (open-named-socket 0))
(setq conn (accept-socket-connection sock))
(setq a 
 (make-array 400 :element-type 'standard-char :fill-pointer 0 :static t))

but when I do:

(setq num (our-read-with-offset (caar conn) a 0 5 3000))

lisp waits for the read to complete and then exits.
The function OUR-READ-WITH-OFFSET is given to lisp in o/new_init.c
It references fSour_read_with_offset which seems to be undefined.

What am I doing wrong?

Tim