[Haskell-beginners] Generating Code To Embed in an Event Loop