Chip-8 emulator in Haskell