[Axiom-developer] End Of File

[Alfredo Portes]

Hi everyone,

I think Arthur was going to be offline for
a couple days. Can somebody translate
this line for me:

while (char := STRING(READ_-CHAR_-NO_-HANG(s,NIL$Lisp,'EOF)$Lisp)$Lisp)
^= "EOF" repeat
             headers := concat [headers,char]

Better said, what does this do:

READ_-CHAR_-NO_-HANG(s,NIL$Lisp,'EOF)

What is necessary to kill this loop (end of file signal).

http://wiki.axiom-developer.org/images/AxServer.pamphlet

Sorry for the dumb question :-),

Alfredo