Thanks, Jason! The example compiled. I thing that's exactly what I need to break through this. I am going to study your code for some time now. On 8 May 2014 19:52, Jason Dagit wrote:

On Thu, May 8, 2014 at 5:08 AM, Vlad Lopatin wrote:

...

Hello List,

I am trying to make the following quasi-code example work:

registerMouseButton :: IO (Event MouseButton) registerMouseButton = do(addHandler, fire) <- newAddHandler setMouseButtonCallback $ \button _ -> fire button fromAddHandler addHandler

According to http://stackoverflow.com/questions/8631816/reactive-banana-how-to-create-an-... looks like it should be something straightforward.

Can somebody show an example of a functional code that registers a key or a mouse event?

I don't have mouse registration, but this code should work for keys: https://github.com/dagit/1GAM/blob/master/pong/reactive-banana/Main.hs#L114

I haven't tested it in a while, but according to the git log I tested it against reactive-banana and GLFW-b at some point :)

Jason