Oops,
Seems like I shocked everyone to death with that mail ;-)
Anyway: There was a small but stupid error, which I feel I have to
correct. The extension of 'go' in "doc/family.l" has two lines
(task P)
(close P)
Either leave them out (they are not absolutely needed in this case), or
properly bind 'P' like this:
(de go ()
(rollback)
(task (port 4000) # Set up the object server in the background
(let P @
(let? Sock (accept P)
(unless (fork) # Child process
(task P)
(close P)
(in Sock
(while (rd)
(out Sock (pr (eval @))) ) )
(bye) )
(close Sock) ) ) )
(server 8080 "@person") )
Cheers,
- Alex
--
UNSUBSCRIBE: mailto:[EMAIL PROTECTED]
