It's useful to check events in tests.
This is currently a DRAFT, because I'd like to try it with ghc!5724 (closed) .
