id	summary	reporter	owner	description	type	status	priority	milestone	version	resolution	keywords	cc
22	rhs of a::Event <|> b::Event push-lagging more than its lhs	ksf		"...as exposed in [http://moonpatio.com:8080/fastcgi/hpaste.fcgi/view?id=977]
. That one depends on unreleased and discontinued ffi bindings to [http://libagar], I can provide the source if necessary.

""more"" meaning that even the lhs may lag occasionally, but rarely.

Those Events are produced and consumed by
{{{
type Sync :: Clock TimeT

registerEvent :: Sync -> Object -> String -> (AgarEvent -> IO a) -> IO (Event a)
registerEvent cl o s a = do
    (sink, src) <- makeEvent cl
    setEvent o s (\ev -> forkIO (a ev >>= sink) >> return ())
    return src

makeSink :: (a -> Action) -> Event a -> IO ThreadId
makeSink a = forkIO . adaptE . fmap a
}}}

that is, event handlers spark threads to sink, and output is shoved into agar in another thread than the one running its event loop (that is sparking the threads)."	defect	new	major