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))


   (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

Reply via email to