Rather fast Brainfuck interpreter in haskell