On Fri, Jun 07, 2013 at 03:01:43PM +0200, Alexander Burger wrote: > Can we find out the socket fd where the events arrive on? > > If so, then I would trigger 'glutMainLoopEvent' whenever an event > arrives: > > (task <socketFd> (glutMainLoopEvent)) > > So you must put the call to (glutMainLoopEvent) into a background task. > The same mechanism is used in the PicoLisp GUI, for example.
If such a file descriptor is indeed not available, then simply replace (catch 'quit (glutMainLoop)) with (task -10 0 (native `*GlutLib "glutMainLoopEvent") ) i.e. set a background task with a 10 msec timeout. ♪♫ Alex -- UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe