haskell-game/sdl2 — pull request #35 by Noeda (2014-12-28 17:28:28+00:00)
Title: Pattern synonymify Scancode and Keycode

This should be a more future-proof way to handle these.