rebol []

server: open/lines tcp://localhost:4321
until [error? try [insert server ask "enter rebol code> "]]
close server