[REBOL] Re: No-wait
From: andreas:bolka:gmx at: 23-Feb-2004 1:41
Sunday, February 22, 2004, 10:42:06 PM, Paul wrote:
> Problem is that when I try copy I get:
> ** Script Error: Cannot use copy on this type port
> ** Where: forever
> ** Near: data: copy port
Your example was:
port: open/direct/no-wait tcp://:7000
x: 0
forever [
print x + 1
x: x + 1
data: first wait port
; HERE
]
At the point I marked with HERE, you have a _server_ port bound to the
word 'port and a _client_ port bound to 'data. Basically,
data: first wait port
_accepts_ a new client. After HERE you can do copy on 'data, e.g.:
tmp: copy data
and copy will behave here, as Maarten described.
--
Best regards,
Andreas