Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[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