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
> (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))
(task -10 0
(native `*GlutLib "glutMainLoopEvent") )
i.e. set a background task with a 10 msec timeout.