Comment by okasaki

That's just what you have to do to get any kind of performance in Haskell because functional programming is pointless.