Just two question to below script, which can be found at:
http://www.rebol.com/examples/txt/rebserver.html


REBOL [
    Title: "Tiny REBOL Server"
    Date: 11-Oct-1999
    File: %rebserver.r
    Purpose: {
        The distributed REBOL server that builds the REBOL system.
    }
    Note: {
        This little server can come in very handy if you need
        to coordinate a number of different systems working
        on a common task.  We use it in-house to build REBOL
        for all of our hardware platforms in parallel.  It is
        sent the scripts that need to be executed.  Note that
        this script is for secure intranet use.
    }
]

server-port: open/lines tcp://:4321

forever [
    connection-port: first server-port
    until [
        wait connection-port
        error? try [do first connection-port]
    ]
    close connection-port
]

1) how's that, connection-port: first server-port will not fail on
connection timeout? Shouldn't it be first wait server-port ???
2) what's forever? There is no reference to such function in the script
...


Thanks a lot,

-pekr-

Reply via email to