[REBOL] Re: /core async example
From: rotenca:telvia:it at: 5-Mar-2004 12:55
Hi Will,
about the crash with not found address: they are not supported.
The async:// protocol is simply "unfinished" as is stated in the Rebol header.
Must be changed the protocol to make it work.
Here it is a VERY FAST patch, to be tested:
on-resolve: func [dnsport port] [
either port/host: scopy dnsport [
change wait-find dnsport port
sclose dnsport
port/awake port
false
] [
wait-stop dnsport
sclose dnsport
port/user-data/awake port make error! "Host not found"
true
]
]
In Async code I added 3 functions also for users:
wait-start
wait-stop
wait-find
to handle insert/remove/find of ports in system/ports/ wait-list.
perhaps i should call them
wait-insert
wait-remove
wait-find
?
---
Ciao
Romano
