[REBOL] Re: View Bug with Event port?
From: rotenca:telvia:it at: 12-Jul-2003 21:02
No, it is not a bug.
It is open-events, called by components/view installation:
open-events: func [][
if event-port [exit]
event-port: open [scheme: 'event]
event-port/awake: func [port] [wake-event port]
insert system/ports/wait-list event-port
]
when you wait something, you are indirectly waiting also
system/ports/wait-list
so you could:
insert system/ports/wait-list my-port
and then do a simple
wait none
or
wait []
example:
insert system/ports/wait-list 1
forever [wait none prin "."]
after 1 second your wait stop (it is not a good idea to put timer wait in the
system wait-list, but for testing purpose...)
---
Ciao
Romano
